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PREFACE 


CP/M has become the standard operating system for Z80, 8080, and 
8085 microcomputers. As a consequence, there are a large number of pro¬ 
grams that run under CP/M. These include assemblers, editors, spelling 
checkers, compilers for the engineering languages BASIC, Pascal, FOR¬ 
TRAN, and APL, as well as general business packages. 

Some CP/M programs can be run automatically so that only a minimal 
knowledge of CP/M is necessary. However, other programs require a 
greater understanding of the operating system. In either case, certain 
routine tasks, such as formatting new disks and making backup copies of 
important disks, require a working knowledge of the operating system. 
Unfortunately, it is difficult to learn the operation of CP/M from the 
documentation that is provided. There are introductory books on the sub¬ 
ject,* but these do not discuss the inner workings of CP/M in great detail. 
Furthermore, there are numerous inconsistencies and idiosyncracies in 
the operation of CP/M that are waiting to trap the unwary programmer. 


*See R. Zaks, The CP/M Handbook with MP/M, Berkeley: Sybex, 1980. 






























































xii MASTERING CP/M 


I have been working with CP/M from its inception (version 1.3). Con¬ 
sequently, I have developed many techniques for improving its usefulness 
by altering parts of CP/M itself and by writing auxiliary assembly 
language programs. This book describes what I have learned. It is a guide 
for the person who wants a deeper knowledge of the inner workings of 
CP/M. 

Although the operation of each program is described, the reader should 
have some prior experience with 8080 assembly language programming. 
Further information on assembly language programming can be found in 
8080/Z80 Assembly Language and Programming the Z80. * To gain the 
fullest benefit of the book, it will be necessary to have a computer with 
CP/M, a system editor, a macro assembler such as MAC or MACRO-80, 
and an assembly language debugger such as SID or DDT. 

The book begins with a detailed description of the organization and oper¬ 
ation of CP/M. The topics include the system parameter area, TP A, CCP, 
BDOS, and BIOS. Use of the built-in commands, control characters, and 
transient programs is also covered. Routine tasks such as formatting new 
disks and making backup copies are discussed in Chapter 2. The opera¬ 
tion of COPY, SYSGEN, and SAVEUSER are also considered, leading 
to the discussion of procedures for altering the CP/M system and saving 
the altered version on disk. In Chapter 3 we actually alter the BIOS to in¬ 
corporate the IOBYTE feature. 

The powerful concept of macros is introduced in Chapter 4. Macros for 
comparing, moving, and filling regions of memory are the foundation of 
a macro library. The use of BDOS for performing console input and 
output is implemented with macros in Chapter 5. Several executable pro¬ 
grams are written. 

Chapters 6 and 7 describe the CP/M disk file system. The macro library 
is expanded with BDOS operations for reading and writing disk files, and 
additional executable programs are written. The final chapter presents 
the details of the CP/M disk directory. A general utility program is 
written that can be used to display the disk parameters, a block allocation 
map, and a detailed presentation of the directory. 

The appendices contain all the reference material needed to write 8080 
and Z80 assembly language programs. Appendix A identifies the ASCII 
codes in decimal, hexadecimal, and octal. Appendix B presents a 
64K-byte memory map. Appendices C and D summarize the 8080 instruc¬ 
tion set alphabetically and numerically, respectively. Appendices E and F 


*A. R. Miller, 8080/Z80 Assembly Language: Techniques for Improved Pro¬ 
gramming, New York: Wiley, 1981. 

R. Zaks, Programming the Z80, Berkeley: Sybex, 1980. 
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give the entire Z80 instruction set according to the official Zilog 
mnemonic, with E being ordered alphabetically and F numerically. Those 
instructions common to the 8080 set are marked with an asterisk. 

The 8080 instruction set is discussed in detail in Appendix G, including 
potential pitfalls and interesting techniques. The Z80 mnemonic is also 
referenced. Appendix H gives a detailed description of the Z80 instruc¬ 
tion set. Appendix I summarizes the CP/M BDOS calls. 

All of the assembly language programs given in this book were 
developed on a Z80 microcomputer fitted with three 5-inch disks (drives 
A, B, and C) and two 8-inch disks (drives D and E). The operating system 
was the Lifeboat 2.2 version of CP/M. The source programs were written 
with MicroPro’s WordStar word processing program. The programs 
were assembled with both the Digital Research MAC assembler and the 
Microsoft MACRO-80 assembler. 

The manuscript was created and edited on the same Z80 computer with 
WordStar. The manuscript was proofed with Spellguard, a spelling 
checker, and Grammatik, a syntax checker. The assembly language 
source programs have been incorporated directly into the manuscript 
from the original source files. The computer printouts that appear were 
also incorporated magnetically into the manuscript. This was ac¬ 
complished by altering the CP/M operating system so that printer output 
was written into a block of memory. The block was then saved as a disk 
file. (This technique is described in Chapter 3.) The final manuscript was 
submitted to the publisher in a magnetic form compatible with the 
photocomposer. 

I am sincerely grateful to Barbara Gordon, editor of the manuscript, 
for all of her helpful suggestions. I also want to thank Douglas Hergert, 
Jim Compton, Joe Sharp, and Eric Novikoff for reviewing the manu¬ 
script and making additional suggestions. John Wiley & Sons kindly gave 
permission to reproduce Appendices A—F and H from my book 
8080/Z80 Assembly Language: Techniques for Improved Programming. 

Alan R. Miller 
Socorro, New Mexico 
September 1982 
































































































CHAPTER 1 


■^mmm 


I 


CP/M 

ORGANIZATION 

AND 

OPERATION 


INTRODUCTION 

The purpose of this first chapter is to review the organization and 
operation of the CP/M operating system. First we will discuss the various 
parts of CP/M—the system parameter area, the transient program area, 
the console command processor, the basic disk-operating system, and the 
basic input/output system. Then we will summarize the operation of 
CP/M, including the use of built-in commands, control characters, and 
transient programs. (Additional details on these subjects can be found in 
The CP/M Handbook.*) After reviewing standard executable programs 
such as STAT and PIP, we will create a new command, CONTIN, and 
look at how and why it works. 


*R. Zaks, The CP/MHandbook withMP/M, Berkeley: Sybex, 1980. 







































































2 MASTERING CP/M 


MEMORY ORGANIZATION 

The hardware of a computer can be divided logically into several parts. 
These include the central processing unit (CPU), the main or random 
access memory (RAM), and the peripherals, such as the console, printer, 
phone modem, and disks. The disk-operating system (DOS) is a software 
program that coordinates the operation of the computer. CP/M is the 
most widely used DOS for the 8080, 8085, and Z80 CPUs. Let us review 
the operation of CP/M. 

The 8080, 8085, and Z80 CPUs are very similar. The concepts 
developed in this chapter apply equally to all three. The CPUs can directly 
address a maximum of 64K bytes of RAM (actually 2 16 or 65,536 bytes). 
Each byte of RAM is assigned an address from 0 to 65,535. CP/M divides 
this memory into five regions. Beginning with the lowest memory address, 
the regions are as follows: 

• The system parameter area. This area contains key items of in¬ 
formation such as the current disk and user number, peripheral 
assignments, the addresses of the basic input/output system and 
the basic disk-operating system, the restart locations, and the 
default buffer. 

• The transient program area (TP A). This is the working area of 
memory. Executable programs and their data are located here. 

• The console command processor (CCP). This area contains the 
programs for the built-in commands DIR, ERA, REN, SAVE, 
TYPE, and USER. 

• The basic disk-operating system (BDOS) .This area contains the 
general programs for the operation of peripherals. 

• The basic input/output system (BIOS). This area contains the 
customized routines that operate the actual peripherals. 

The BDOS and BIOS regions are known collectively as the full disk- 
operating system (FDOS). The five regions of RAM are summarized in 
Figure 1.1. 


The System Parameter Area 

The system parameters, shown in Figure 1.2, begin at address 0. The 
first three bytes (bytes 0 to 2) contain a jump into the BIOS warm-start 
entry. When this instruction is executed, CP/M is restarted. This causes a 
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High memory 


100 hex 
Low memory 


Figure 1.1: Memory Partitions of the CP/M Operating System 
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user number 

4 hex 


IOBYTE 

3 hex 


Jump to BIOS 
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Low memory 



Figure 1.2: The System Parameter Area: 0 to FF Hex 
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fresh copy of the CCP and the BDOS to be copied into memory from the 
system disk. The disks are also reset at this time. 

The fourth byte of the system parameter area (address 3) is called the 
IOBYTE. It indicates the current memory assignments of the four logical 
peripherals: console, reader, punch, and list (printer). The next location, 
address 4, contains two items: the current disk drive and the current user 
number. Beginning at address 5, the next three bytes contain a jump into 
the BDOS. This instruction is executed when console, printer, and disk 
operations are desired. 

The region from address 0 to 38 includes eight locations referenced by 
the 8080 instructions RST 0 through RST 7: 


Instruction 

RST 0 
RST 1 
RST 2 
RST 3 
RST 4 
RST 5 
RST 6 
RST 7 


Hex address 

0 

8 

10 

18 

20 

28 

30 

38 


These instructions generate subroutine calls to the corresponding memory 
locations. The instructions can be activated by hardware interrupts as well 
as by normal subroutine calls. RST 6 and RST 7 are used by the debuggers 
DDT and SID. Execution of an RST 0 instruction will perform a warm 
start, because it causes a branch to address 0. 

When a program is executed from the command level of CP/M, one or 
two file names may be given on the command line. For example, along 
with the command EDIT, the user might include two parameters: 

EDIT FIRST.FIL B:SECOND.FIL 

The region of memory beginning at 5C hex is called the default file con¬ 
trol block (DFCB) because the CCP automatically selects this region for 
the file control block area. A file control block is a 32-byte block describing 
each disk file. The CCP takes the first parameter, FIRST.FIL in this 
example, for the first FCB. The CCP also initializes a second FCB starting 
at 6C hex. The second parameter, B:SECOND.FIL in this example, is used 
this time. 

The region from 80 to FF hex is a general buffer area. The command 
line tail, all characters typed after the command itself, is placed in this 
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region. In the above example, the command line tail is the two file names. 
This region is also used as the default area for transferring data to and 
from disks. 

The system parameter area is described further in Chapter 3. 


The TPA and the CCP 

The transient program area usually contains the largest portion of the 
memory. Beginning at 100 hex, it is the region where executable programs 
reside. 

The console command processor contains instructions for processing 
commands typed from the console. The area of memory belonging to the 
CCP is not needed after an executable program has begun operations. 
Consequently, executable programs may enlarge the TPA to overlap this 
region. A warm start at the conclusion of the program will reload the CCP 
along with the BDOS. 


The BDOS and the BIOS 

The basic disk-operating system contains the device-independent 
routines for interacting with the console, printer, and disk drives. This 
region is generally the same for all CP/M computers. We will study its 
operation in detail in Chapters 5, 6, and 7. 

The basic input/output system contains instructions for operating the 
peripheral devices: the console, printer, phone modem, disks, and so 
forth. Each BIOS must be customized for the particular set of physical 
devices actually attached to the computer. Therefore, the BIOS for two 
identical computers will be different if different peripherals are used. We 
will learn more about the BIOS in Chapters 2 and 3. 


OPERATION OF CP/M 

When CP/M is first started up (booted), the CCP, the BDOS, and the 
BIOS are copied into memory from the system disk (usually drive A). This 
operation is called a cold start. After loading the system into memory, the 
cold-start loader transfers control to BIOS. BIOS then fills in the system 
parameter area at addresses 0 to 7. This includes the jump to BIOS (ad¬ 
dresses 0 to 2), the IOBYTE (address 3), the current disk drive and user 
number (address 4), and the jump to BDOS (bytes 5 to 7). 
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At this point CP/M displays a prompt symbol to indicate that it is ready 
to accept a command from the console: 

A> 

Built-in Commands 

CP/M can control up to 16 separate disks. These are designated by the 
first 16 letters of the alphabet (A - P). The letter A in the prompt indicates 
that disk drive A is the current or default drive. The console commands 
that are built into the CCP can be executed at this time. The following are 
built-in commands: 


Command 

Function 

DIR 

List the disk directory 

ERA 

Erase a disk file 

REN 

Rename a disk file 

SAVE 

Create a new disk file from memory 

TYPE 

Display an ASCII file on console 

USER 

Change the user number 


These commands may not be preceded by a disk name, because they are 
not associated with any particular disk drive. In other words, the command 

A:DIR 

is improper. Some of these commands, however, may take parameters 
that are disk names. For example: 

DIR A: 

The command DIR is given to obtain a listing of the files on the default 
disk. The listing is arranged across the screen in four columns. All of the 
files are displayed if no parameter is given. 

A whole class of files can be selected by using one of the ambiguous 
symbols, * or ?. For example, the command 

DIR *.ASM 

will show the names of all files on the default disk that have the type ASM. 
The asterisk refers to all possible combinations of characters, including 
blanks. The double asterisk, *. *, refers to all of the files on the disk. For 
many CP/M commands, the asterisk can be used as an ambiguous file 
name. 

The question mark is used to indicate a single ambiguous character, 
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including a blank. Thus, the file name SORT?.BAS refers collectively to 
the following files: 

SORT 1. BAS 
SORT2.BAS 
SORT3.BAS 
SORT. BAS 

A file or group of files can be erased with the command ERA. 
Ambiguous symbols may be used (carefully!) in the parameter of ERA. 
For example: 

ERA NEW.ASM 
ERA *.ASM 
ERA *. * 

The third example erases all files. In this case, however, CP/M asks for 
verification of the command before erasing all the files on a disk: 

ALL (Y/N)? 

You must enter a Y if you want to continue. 

We can use the REN command to rename individual files. REN requires 
two unambiguous file names; that is, the * and ? symbols must not be 
used. The new file name is given first, followed by an equal sign and the 
old file name. For example, the command 

REN NEW. ASM = OLD. ASM 

changes the name of OLD.ASM to NEW.ASM. 

The SAVE command makes a disk file from a memory image. SAVE 
takes two parameters. The first parameter is the number of 256-byte 
blocks to be saved. The second parameter is the file name. For example, 
the command 

SAVE 4 NEWFIL 

creates a disk file called NEWFIL from the first IK bytes of the transient 
program area. 

An ASCII disk file can be viewed on the console with the TYPE com¬ 
mand. The single parameter must be an unambiguous file name. Scrolling 
can be stopped by typing control-S. (The task is terminated if any other 
key is pressed during scrolling.) Scrolling is resumed by pressing any key, 
but it is wise to use control-S so that you do not unintentionally terminate 
the command. 

The user number can be changed with the USER command. The single 
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parameter is a decimal number from 0 to 15. CP/M can keep track of 16 
different users, numbered from 0 to 15. User 0 is normally selected when 
CP/M is initialized. Whenever a new disk file is created, it is coded with 
the current user number. Therefore, each disk file is associated with a 
particular user number. Only files belonging to the current user are nor¬ 
mally accessible. 


Control Characters 

Several console keys have special meanings to CP/M; following are the 
control-character commands: 


Command Function 


control-C 

control-E 

control-H 

control-I 

control-J 

control-M 

control-P 

control-R 

control-S 

control-U 

control-X 


Perform a warm start 
Move to next line 

Back up cursor to previous character 
Tab key 

Execute line (line feed) 

Execute line (carriage return) 

Engage or disengage printer (toggle) 
Reprint current line 
Freeze scrolling 

Cancel current line, start new line 
Cancel current line, restart line 


Warm Start 

A warm start is performed when control-C is typed and the cursor is in 
the//rs/ position of a line. This action is similar to a cold start. The CCP 
and BDOS are copied from disk drive A into memory. The jumps into 
BIOS and BDOS at the beginning of memory are also reinitialized, but the 
memory image of the BIOS is not altered. The current disk drive and drive 
A are logged in at this time. 

When CP/M first accesses a disk drive, it makes a copy of the disk 
directory and certain characteristics of the disk. You can observe this 
operation with floppy disks by accessing each one in turn. For example, 
when you give the command 

B: 

the head of disk drive B will be loaded. This is usually indicated by a red 
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activity light on the front of the disk drive. The system prompt will change 
to B>. If you have additional drives, you can go to each one in turn by giv¬ 
ing its name followed by a colon. If you return to drive A with the command 

A: 

the system prompt will change back to A >. However, no disk activity will 
be apparent because drive A has already been logged in. CP/M assumes 
that the diskette has not been changed since the last time drive A was 
accessed. 

The disk directory is not reread on subsequent references to a disk. 
Thus, if you remove a floppy diskette from a drive and replace it with 
another diskette, you should perform a warm start with the control-C 
command. This forces a reading of the directory of the new disk. If 
you neglect to perform a warm start after changing diskettes, CP/M 
may be able to read the disk. However, if you try to write on this disk, 
CP/M will refuse to perform the write operation and will issue an error 
message: 

BDOS ERROR ON A: R/O 

CP/M will wait until you type a carriage return. It then automatically per¬ 
forms a warm start, even though you have not typed control-C. Because 
the new disk is read at this time, it is now possible to write on it. 


Transient Programs 

The number of commands built into the CCP is limited. Consequently, 
additional operations are provided by separate, executable programs that 
are stored as COM files on one of the disk drives. We execute these pro¬ 
grams by typing the disk drive and the file name (without the extension 
COM). The drive name may be omitted if the program is on the default 
drive. When the name of a transient program is entered, CP/M copies the 
file from disk into memory and then branches to it. 

Programs stored on disk are referenced by a file name. A CP/M file 
name consists of a primary name and an extension. The primary name 
contains from one to eight alphabetic or numeric (alphanumeric) 
characters. Characters other than the letters A - Z and the digits 0 - 9 can 
be used in certain cases, but it is better to avoid them if you are unsure. For 
some applications a file type or file name extension is required. In other 
cases it is not. If an extension is required, it contains from one to three 
characters. The file type is usually a mnemonic suggesting the nature of 
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the file. For example: 


Extension 

Meaning 

ASM 

COM 

HEX 

BAK 

BAS 

FOR 

PAS 

REL 

ASC 

LST 

Assembly language file 

Executable (command) file 

Hexadecimal file 

Backup file 

BASIC file 

FORTRAN file 

Pascal file 

Relocatable binary file 

ASCII text file 

ASCII listing file 


Several transient programs are supplied with the CP/M operating 
system. These are independent executable programs that have a file type 
of COM: 


File name 

Program function 

ASM 

DDT 

DUMP 

ED 

LOAD 

MOVCPM 

PIP 

STAT 

SYSGEN 

SUBMIT 

XSUB 

Assembler 

Debugger 

Program to examine executable files 

System editor 

Convert HEX file to COM file 

Change CP/M size 

Copy files 

View disk directory in detail 

Copy system tracks to another disk 

Process a collection of commands 

Extension of SUBMIT 


Following are other common executable programs that are available 
commercially: 


File name 

Program function 

BADLIM 

COPY 

FILEFIX 

FORMAT 

MAC 

Program to isolate bad disk sectors 
Track-to-track copier 

Disk utility program to undelete files 

Initialize a disk 

Digital Research macro assembler 


MACRO-80 Microsoft macro assembler 

MBASIC Microsoft BASIC 
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SAVEUSER 

SID 

ws 


Lifeboat utility to save BIOS on disk 
Digital Research symbolic debugger 
WordStar text editor 


Many other executable programs can be purchased or written. We will 
write many useful programs in this book. 


first executable program 

Let us begin by creating a very simple executable program. Boot CP/M 
if it is not already in place. When the process is complete there will be a 
prompt of 


A> 


on the console. Give the built-in DIR command to see what programs are 
available on drive A. If the executable program STAT.COM appears in 
the listing, execute it with the command 

STAT *.* 

Like DIR, the STAT command produces a listing of all programs on the 
disk. In addition, STAT arranges the files in alphabetical order. 

If you have a printer, turn it on. Then type control-P (to send console 
output to the printer) and give the STAT command again. The printer will 
duplicate the output of the console. Type control-P again to disengage the 
printer. Tear off the printer output and place this directory listing into the 
diskette envelope for future reference. 

STAT gives additional information about the files on the disk. Con¬ 
sider, for example, the following lines: 

58 8K 1 R/O A:PIP.COM 

266 34K 3 R/W A.WSOVLYl.OVR 

The first line indicates that the file PIP.COM is located on drive A. This 
file can only be read (indicated by R/O); that is, it is write protected. 
Furthermore, the program consists of 58 (128-byte) records that are 
stored in 8K bytes. The file is referenced by one physical extent. 

Smaller files can be referenced by a single disk-directory entry called a 
physical extent (a 16K block of space on the diskette). If more than one 
extent is needed for a file, all the extents have the same file name. 
However, only one of these entries is shown in the STAT and DIR listings. 

The second file in the above example, WSOVLY.OVR, is also located 
on drive A. This file can be both read and written over (indicated by 
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R/W); it is not write protected. It contains 266 records stored in 34K bytes 
and requires three physical extents. At the end of the ST AT listing, the 
remaining space on the diskette is given. 

Often it is convenient to have a method of returning to a previous com¬ 
mand after a warm start has been performed. We will create such a 
method now. Give the built-in command 

SAVE 0 CONTIN.COM 

This puts a new directory entry on the drive currently logged in. However, 
because the file size is specified as zero, no actual data are saved. If you 
execute ST AT again, the remaining space on the disk should be the same 
as before. The listing will indicate that the new entry, CONTIN.COM, 
has zero bytes. We will find that this empty “program” is actually very 
valuable. 

Whenever the command CONTIN is given, CP/M will attempt to load 
the corresponding program, CONTIN.COM, then branch to the beginning 
of the TPA at 100 hex. Because the program CONTIN has no data, this 
command simply restarts the previous program. To see how this works, 
give the command 

PIP 

This will direct CP/M to load PIP.COM into memory and branch to it at 
100 hex. PIP responds with an asterisk. You will normally give PIP a 
command at this point. But in this case, simply type a carriage return. 
This action will terminate PIP, returning control back to CP/M. CP/M 
performs a warm start and gives the system prompt, awaiting another 
command. Now type 
CONTIN 

Because this dummy program has no data, the effect is simply to branch 
to address 100 hex, the beginning of PIP. The memory image of PIP is still 
intact, so the PIP star should appear again. You can verify this by giving 
PIP a command. For example, type 

PIP2.COM=PIP.COM[V] 

PIP will make a copy of itself calling the new copy PIP2.COM. The param¬ 
eter V enclosed in brackets causes PIP to verify that the new copy is correct. 

This technique will work with many but not all executable programs. 
For example, it will not work with STAT because data areas are not prop¬ 
erly reinitialized when the program is restarted. It will, however, work 
with MB ASIC. 
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Let us investigate this phenomenon with Microsoft BASIC. Execute 
BASIC by typing its name. Then write the following BASIC program: 

10 FOR I = 1 TO 9 
20 PRINT I; 1*1, 1/|, SQR(I) 

30 NEXT I 
40 END 

Try out the program with the command RUN. This program only exists in 
memory, so you will lose it if you leave BASIC. Therefore, you will nor¬ 
mally want to make a permanent copy with the BASIC command 

SAVE "FIRST" 

But suppose that you inadvertently typed the BASIC command 
SYSTEM before saving your program (try it). You will find that you are 
back at the CP/M system level. Apparently you have lost your BASIC 
program. Now give the command 

CONTIN 

and you will return to BASIC and the program you wrote with it. Give the 
command LIST to see that the source program is still there. Then give the 
RUN command to see that it still works. You can now issue the SAVE 
command if you want to save your original BASIC program. 


SUMMARY 

In this chapter we briefly reviewed the fundamentals of CP/M 
organization and operation. This included a discussion of the system 
parameter area, the TPA, the CCP, the BDOS, and the BIOS. The built- 
in commands, control characters, and some standard executable programs 
were also considered. We then wrote a short executable program called 
CONTIN that can be used to restart most executable programs. 

In the next chapter we will learn how to copy and alter the disk version 
of the CP/M system. 





























































































INTRODUCTION 

In Chapter 1 we studied the fundamental CP/M operations and learned 
how the memory is organized. Because CP/M is a disk-operating system, 
the disk plays an important role in the operation. Let us therefore focus 
our attention in this chapter on the organization of the disk. 

In this chapter we will learn how to duplicate CP/M disks by formatting 
a new diskette, copying the data, and copying the system tracks. We then 
learn how to alter the BIOS or USER routines of the CP/M system, how 
to assemble and test the new version, and finally how to write a copy of the 
new version to the disk. 
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FORMATTING AND DUPLICATING DISKS 

Floppy disks are one of the most important devices used to store micro¬ 
computer information. The surface of the disk is a magnetic material that 
is read and altered by a read/write head. (The operation is similar to sound 
recording with magnetic tape.) Physically, floppy disks are formatted with 
concentric rings called tracks. Each track is divided into regions called 

^Itis common practice to place the CP/M system disk with the executable 
programs in drive A, and a working disk in drive B. Information can be 
safely stored on disks provided some precautions are observed. For example, 
the disks should not be placed near magnetic fields or in a dusty environ¬ 
ment. Even when you are careful, an electrical failure during a write 
operation can result in lost data. Therefore, it is a good idea to make 
backup copies of all important disks. Let us consider several methods for 
duplicating the information on disks. 

New disks must be formatted before they are used. There are two com¬ 
mon floppy-disk sizes—8-inch diameter and 5-inch diameter. In addition, 
there are disks that are hard or soft sectored, single or double density, 
and single or double sided. The number of tracks per disk and sectors per 
track also varies from one version to another. 

When you buy floppy disks, you must select the correct diameter 
(8-inch or 5-inch) and sectoring format (soft or hard). If you require hard- 
sectored disks, you must also choose the correct number of sectors per 
track. Many different floppy-disk formats are obtainable from a par¬ 
ticular type of disk. Consequently, it will usually be necessary to format a 
new diskette before it is used for the first time. 

Formatting a New Diskette 

Floppy disks are formatted by executing a program that is named 
FORMAT.COM, FORMAT5.COM, or FORMAT8.COM. This program 
should be included on your original CP/M disk. Format programs have 
to be specifically tailored to the type of disk you are using. Do not try to 
format a disk with a program taken from a different computer, because it 

is not likely to work. .. . 

When you use a floppy diskette for the first time, place it into drive B 
for the formatting operation. In Chapter 1 we saw that a warm start must 
be performed when changing disks. But this is an exception. Do not per¬ 
form a warm start after inserting a new, unformatted diskette. 

If drive A is not the default drive, give the command ‘A: ’ so that drive A 
will be the default drive. Be sure that the diskette in drive A contains your 
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formatting program. Execute this program by typing its name. You may 
have to answer several questions during program execution. These will 
deal with whether the diskette should be formatted in single or double 
density, and whether the drive is single sided or double sided. Some 
systems can figure these things out automatically, so there may be no 
questions. 

If you open a new box of diskettes, it will be convenient to format all of 
the disks at once. The FORMAT program is usually written with this in 
mind. After the first disk has been formatted, change to a fresh disk and 
press RETURN. The program will usually repeat the previous operation. 
Remember, do not try to write on a new disk until it has been formatted 
or you might get a BDOS error. In the next section we will consider a 
general technique for making copies of disks using SYSGEN and PIP. 

Duplicating a Diskette with SYSGEN and PIP 

CP/M disks are partitioned into two regions. These are known as the 
system tracks and the data tracks. The system tracks contain the CP/M 
operating system, including the CCP, the BDOS, and the BIOS. This 
region of the diskette is not usually accessible. The data tracks are divided 
into the directory area and the program-storage area. 

Because the system tracks are not normally accessible to the user the 
built-in command 

ERA *.* 

will erase all of the regular user files stored on the data tracks of the disk 
but it will not alter the system tracks. 

However, you will need to access the system tracks to make a backup of 
your system diskette or to alter the BIOS. After a new diskette has been 
formatted, all of the regular files can be copied from the original diskette 
to the new one with the PIP program. If the original diskette is on drive A 
and the new diskette is on drive B, give the command 

PIP B:=A:*.*[V] 

Now the new diskette contains all the files from the original diskette The 
new diskette can be used in drive B, but it cannot yet be used in drive A. 
This is because the system tracks, which contain the CCP, BDOS, and 
BIOS, have not yet been recorded on the new diskette. 

A program called SYSGEN can be used to copy the system tracks from 
one diskette to another. However, SYSGEN cannot do this task directly, 
t must first copy the system tracks from the source disk into memory. 
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Then it can copy the memory image to the system tracks of another disk. 

Let us see how this works. . 

Execute SYSGEN and follow its directions. There will be slight varia¬ 
tions from one version of the program to another, but the general approach 
is the same. When you execute SYSGEN it might respond with something 

like this: 

SYSGEN Version 3.0 
Distributed by Lifeboat Associates 
for CP/M2 on quad North Star. 

Source drive NAME (or RETURN to skip) 

Enter the name of the source drive but do not include the colon. This is the 
drive where the original disk is located, normally drive A. SYSGEN 
repeats your response and then asks for a second carriage return. For ex¬ 
ample, if you respond with drive A, it will display the following line: 

Place SOURCE disk on A, then type RETURN 

When you enter a second carriage return, the response is as follows: 

Function complete 

CP/M image in RAM at 900H is ready to write 
or reboot and "SAVE 40 CPMxx.COM" 

Destination drive NAME (or RETURN to reboot) 

During this step SYSGEN copies the CP/M system tracks from the source 
drive into memory. There are now two copies of CP/M in memory (see 
Figure 2.1). The working version is at the top of memory and the 
SYSGEN version is near the bottom, just above SYSGEN itself. 

The next step is to write the SYSGEN version of CP/M to the system 
tracks of a floppy disk. SYSGEN first must know where (on which drive) 
to write the system. Give the drive name of the new diskette. This will 
usually be drive B. Again, do not include the colon. SYSGEN responds 
with the following: 

Place destination disk on B, then type return 

When you enter a carriage return SYSGEN copies the system from 
memory to the system tracks of the new diskette. That completes the pro¬ 
cess. SYSGEN then prints the following lines: 

Function complete 

Destination drive NAME (or RETURN to reboot) 

At this point you can place copies of CP/M onto the system tracks of 
additional formatted diskettes. Remove the new diskette and insert 
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Figure 2.1: The SYS GEN Version and the Working Version of CP/M 


another formatted diskette into drive B. Type the letter B and a carriage 
return. SYSGEN will display the requested drive and ask for another carriage 
return. SYSGEN will then copy the system from memory to the system 
tracks of this diskette. In this way you can easily write the system tracks to 
a number of diskettes, one after the other. If you only want a single copy, 
simply type a carriage return and the program will terminate. In the next 
section we will consider another method for duplicating diskettes. 
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Duplicating a Diskette with Copy 


We used PIP and SYSGEN in the previous section to make a duplicate 
copy of a diskette. In this section we will consider a second method that is 
simpler and quicker. However, this approach requires a nonstandard 
program called COPY that may not be provided. Check whether you 
have an executable program called COPY.COM, COPY5.COM or 
COPY8.COM. Usually such a program can perform the three tasks ot 
formatting a new diskette, copying the system tracks, and copying the 
data tracks all in one operation. 

Put the original diskette in drive A and a new, unformatted diskette in 
drive B. Be careful not to perform a warm start. Execute the COPY program 
and follow its instructions. Answer the questions about the name of the 
source and destination drives. In this example, the source drive is A and 
the destination drive is B. This may be the default option. Before giving 
the final carriage return, you can change the source disk in drive A if you 


want to copy a different disk. 

If this operation is successful, you have discovered a convenient 
method of duplicating diskettes. However, the operation may fail if your 
version of COPY requires a formatted destination disk. Even so, this is a 
convenient way to copy a disk. Although you must format the new 
diskette separately, you can copy both the system tracks and the data 
tracks with the COPY program. We will now learn how to alter the infor¬ 
mation stored on the system tracks of a disk. 


GENERAL PROCEDURE FOR ALTERING THE BIOS 

In the previous examples of this chapter we considered methods of 
duplicating a diskette, including the system tracks. In the next chapter we 
will want to be able to alter parts of the CP/M system stored on these 
system tracks. This is an awkward procedure, because the system tracks 
are not normally accessible. Therefore, in the remainder of this chapter 
we will discuss three methods for accessing the CP/M system tracks so 
they can be revised. (Be sure to make a duplicate copy of the system 
diskette and alter the copy rather than the original.) 

The revisions we will perform in the next chapter will be made to the 
BIOS area of CP/M. The alterations will require an assembly language 
source program named BIOS.ASM, BIOS.MAC, USER.ASM, or 
USER.MAC. This program should be provided on your original CP/M 
diskette. After altering the BIOS source program, we will assemble it, 
then copy it over the original working version of BIOS. When we are 
satisfied that the new version performs properly, we will need to save a 
permanent copy on the system tracks of a floppy disk. 
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Although we will not actually change BIOS in this chapter, we will 
cover the necessary steps for moving the altered BIOS into the CP/M 
system in memory, testing the new BIOS, and saving it on the system 
tracks of a diskette. These steps are as follows: 

1. Alter the BIOS. ASM or USER. ASM source program. 

2. Create the corresponding HEX or REL file with the assembler. 

3. Copy the HEX or REL file into place with DDT or SID. 

4. Try out the new features to see if they work. 

5. Copy the new version to the system tracks. 

At this time we will assemble the original version of BIOS. Then we will 
install it in memory to try it out. Finally, we will copy the “new” version 
to the system tracks of a floppy disk. Because we have not altered the 
original BIOS, you should not notice any change in the operation of your 
CP/M. The purpose of this step is to learn how to test an altered version of 
BIOS and how to make a permanent copy of it on a system disk. First we 
must determine the location of the working version of BIOS in memory. 

LOCATING THE WORKING VERSION OF BIOS 

We saw in Chapter 1 that the BIOS region of CP/M contains the tailor- 
made routines needed to operate the particular peripherals connected to 
the computer. These routines will be different from one computer to the 
next. However, the remainder of CP/M, such as the BDOS and the CCP, 
is universal—that is, it is independent of any particular computer. There 
is therefore a series of jump instructions, called vectors, at the beginning 
of the BIOS, which gives the addresses of the important routines within 
the BIOS. Thus it is possible to change the BIOS instructions without 
affecting the remainder of CP/M operations. 

Sometimes these routines reside in a separate region of memory known 
as the USER area, a subset of BIOS. In either case, a permanent copy of 
these routines is present on the system tracks and a temporary working 
copy is present in memory. We can make alterations to the memory image 
of these routines to see whether a new version does what we want. Once we 
are satisfied that the operation is correct, we must make a permanent copy 
of the new version on the system tracks of drive A. 

Let us now use the debugger to locate the working version of BIOS, that 
is, the version at the top of memory. The jump instruction at the beginning 
of memory references the BIOS warm-start address. Execute the debugger 
and give the command 

LO (the letter L followed by a zero) 

The letter L is a mnemonic for list. This command is used to disassemble 
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8080 instructions, that is, to display them in mnemonic form. The param¬ 
eter zero is the memory address. The first line of the response might be 

JAAP D303 

The symbol JMP is the 8080 mnemonic for an unconditional branch instruc¬ 
tion and D303 is the operand, the target of the branch. This instruction 
refers to the BIOS warm-start entry. However, we want the previous cold- 
start entry at location D300 hex in this example. 

The next step will investigate the working BIOS region in memory. Being 
careful to substitute 3 less than the value you found, give the command 

LD300 

The response will be a series of jump instructions. For example. 


D300 

JAAP 

D380 

(initial cold start) 

D303 

JAAP 

D39F 

(warm-start reset) 

D306 

JAAP 

DA06 

(console status) 

D309 

JAAP 

DA09 

(console input) 

D30C 

JAAP 

D4E6 

(console output) 

D30F 

JAAP 

DA0F 

(printer output) 

D312 

JAAP 

DAI 2 

(punch output) 

D315 

JAAP 

DAI 5 

(reader input) 

D318 

JAAP 

D4CA 

(beginning of disk routines) 

D31B 

JAAP 

D499 


D31E 

JAAP 

D4CC 



We must now determine whether there is a separate USER area in addi¬ 
tion to the regular BIOS region. If there is only a BIOS region, then all of 
the jump vectors will be pointing to nearby memory locations, that is, 
within about 800 hex of each other. Notice that in the above list the first 
two vectors branch to locations near the beginning of the BIOS (D380 and 
D39F hex). However, several of the other vectors refer to an area that is 
farther away (DA06, DA09, and so forth). 

Let us examine this second area with the debugger. If we give the command 

LDA00 

the response might be as follows: 


DA00 

JAAP 

DAI B 

(initial cold start) 

DA03 

JAAP 

DA41 

(warm-start reset) 

DA06 

JAAP 

DA7E 

(console status) 

DA09 

JAAP 

DA96 

(console input) 

DA0C 

JAAP 

DAB6 

(console output) 

DA0F 

JAAP 

DACC 

(printer output) 
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DAI 2 JMP DB8B (punch output) 

DA 15 JMP DBD6 (reader input) 

We have found another set of vectors. In this case, all the vectors refer to 
the immediate memory region. We have located the auxiliary region 
known as the USER area, a subset of the BIOS routines. 

Notice that there is a one-to-one correspondence between many of the 
vectors for the BIOS region and the corresponding vectors for the USER 
area. That is, some of the vectors in the BIOS area refer to the same 
relative positions in a different memory area. For example, address D306 
contains a jump to address DA06. One apparent exception in the above 
list is the console output vector at address D30C. It references address 
D4E6. However, if this reference is traced with the system debugger, it 
will ultimately point to the corresponding address DAOC. Disk routines 
are not usually placed in the USER area, so we do not expect USER jump 
vectors beyond XX15 hex. 

It is important to determine whether your system has a USER area. If 
there is no USER area, we will make all the changes in the BIOS region 
using a source program named BIOS.ASM or BIOS.MAC. But if the 
USER area exists, we will perform the alterations in that area. The source 
program will be named USER.ASM or USER.MAC. 


ASSEMBLING THE BIOS OR USER 
SOURCE PROGRAM 

In this section we will assemble the original source program for the 
BIOS or USER routines. (If you cannot find the source program, you will 
not be able to make the revisions we discuss in Chapter 3.) We will then 
compare the assembled code with the version used by CP/M. This will 
ensure that your source program matches the version in use. 


Assembling the BIOS or USER Source Program with 
Digital Research MAC 

Look on your original CP/M diskette for a program called BIOS.ASM 
or USER.ASM, and copy it to a working disk. Look at the beginning of 
this program with the command TYPE or with the system editor. Locate 
the ORG instruction that establishes the address of BIOS or USER. Be 
sure that it matches the value you found in the previous step. For our ex¬ 
ample, the statement is as follows: 

ORG ODAOOH ;beginning of USER 
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On the other hand, the operand of the ORG statement may be an expres¬ 
sion such as 

ORG MSIZE*400H - 600H 

In this case, the BIOS location is calculated by the assembler according to 
the memory size (MSIZE). Locate the EQU statement that defines MSIZE 
and see if it will give the correct value during assembly. Alternatively, you 
can inspect the assembly listing to see what value the assembler assigned it. 
Assemble the source program with the command 

MAC BIOS 


or 


MAC USER 

This step will generate three files with extensions HEX, SYM, and PRN. 
The HEX file contains the assembled instructions coded in ASCII hex. 
The SYM file lists the program symbols and their values. The PRN file 
gives the original source program with the corresponding addresses and 
assembled code. 

Examine the resulting assembly listing with the TYPE command. 
Find the jump vectors near the beginning of the listing. Compare the 
addresses of the jump vectors with the values found by the debugger for 
the actual working copy of BIOS. If these addresses are different, you 
must change the operand of the ORG statement (or the value of MSIZE 
in the operand expression) so that the assembled code matches the value 
you found for the working version of BIOS. 

Also compare the targets of the jump vectors to see if they have the 
same values as the working version of BIOS. If the vector addresses are 
correct but the target addresses are different, your source program does 
not match the working version. It still may be possible to use this version, 
however. 

If the jump vectors in the assembly listing match the values you found 
for the working version, we can try out the assembled version by copying 
it into place over the working version of BIOS. Give the command 

SID BIOS. HEX 


or 


DDT USER. HEX 

This will execute the debugger and direct it to copy the HEX file of BIOS 
or USER into place. CP/M is now using the “new” version of BIOS. You 
may want to explore the new version with the L command of the debugger. 
However, you will find that this command no longer works. The debugger 
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has loaded BIOS into an address larger than itself. Whenever this happens 
the debugger L command is automatically disabled. The solution is simple! 
Return to CP/M with control-C. Then execute the debugger once again. 

Assembling the BIOS or USER Source Program 
with Microsoft MACRO-80 

If you use the Microsoft assembler, it will be a bit more difficult to in¬ 
stall the assembled BIOS. One method is to replace the ORG directive 
with a PHASE directive such as 

.PHASE ODAOOH /absolute code 

Here the operand ODAOOH is the beginning of BIOS or USER Notice 
that the symbol PHASE is preceded by a decimal point. 

Be sure that the source file has a type of MAC rather than ASM. 
Assemble the program with the command 

M80 =BIOS/L 

In this example, the L switch will direct the assembler to create a PRN file 
in addition to the usual REL file. 

Inspect the resulting PRN file as described in the previous section. 
Compare the addresses for the jump vectors in the listing to the location 
of the working version of BIOS. When they agree, you can install the 
assembled version using the linking loader Link-80 and the debugger. 
Start with the command 

L80 BIOS/E 

This command will convert the file BIOS.REL into an executable version 
and place it at the beginning of the TPA. The E switch causes the loader to 
exit to the CP/M operating system after it has created the memory image. 

The situation is now very unusual. The newly assembled BIOS is sitting 
in low memory starting at 100 hex. However, the first instruction contains 
a jump to the beginning of BIOS (DA00 hex in this case). The program we 
want actually begins at address 103 hex. 

Link-80 has displayed three numbers enclosed in brackets. For example: 
[DA00 39F 3] 

The first number (DA00 hex) is the address of the beginning of BIOS. The 
second number is the location of the end of the TPA memory image of 
BIOS. The third number, 3, is the program size, that is, the number of 
256-byte blocks needed to save the program. Make a disk copy of the 
memory image by giving the CP/M command 

SAVE XX BIOS.COM 









26 MASTERING CP/M 


where XX is the number of blocks to save. 

Load the new file back into memory with the debugger command 

SID BIOS.COM 

Remember, the first three bytes starting at address 100 hex contain an un¬ 
wanted jump instruction. The actual program begins at address 103 hex. 
We found that the end of the image is at 39F hex. 

Move the image into place with the debugger, being careful to start at 
address 103 hex rather than address 100 hex. As an example, the move 
command might look like this: 

M103,39F,DA00 

The “new” version of BIOS has now been installed in memory, overlaying 
the original copy. Of course, we have not yet made any alterations to 
BIOS or USER. 

COPYING THE ALTERED BIOS TO DISK 

In the previous example, we assembled the original version of BIOS or 
USER and copied the assembled version over the working version. In the 
next chapter, we will add features to the BIOS source program before 
assembly. We can then test the new features after the assembled version 
has been installed over the original working version. But if you now turn 
off the computer, the original version will be loaded next time CP/M is 
booted. It will be necessary to copy the revised working version of BIOS 
from memory to the system tracks of a diskette so that you will have a per¬ 
manent copy. In this example, we have not made any changes to the BIOS. 
However, let us go through the process of copying the working version to 
the system tracks to ensure that you understand the process. 

There are three different ways to install a revised version of BIOS onto 
the system tracks of a diskette. We will begin with the easiest method. 

Copying BIOS to Disk with SAVEUSER 

The simplest method of copying the working version of BIOS to the 
CP/M system tracks is to run a program called SAVEUSER. However, 
SAVEUSER is not a regular CP/M program, so you may not have a copy. 
SAVEUSER directly copies the current working version of the USER 
area of BIOS to the system tracks of the disk in drive A. To save the current 
version of USER, type the name SAVEUSER and answer the questions. 
If you cannot locate a copy of SAVEUSER, then you must use one of the 
other methods for saving an altered copy of the system. 





DUPLICATING AND ALTERING CP/M DISKS 27 


Copying the Altered BIOS from a HEX File 
to Disk Using SYSGEN 

We saw previously in this chapter that SYSGEN can be used to copy the 
system tracks from one disk to another. The operation is actually performed 
in two steps. The system tracks are copied from the source disk into 
memory, then the memory image is copied to the destination disk. 

SYSGEN can also be used to revise the system tracks of a disk. How¬ 
ever, in this case the process is stopped in the middle, after the system has 
been copied from the source disk to the SYSGEN position of memory 
The revised copy of BIOS is placed over the SYSGEN position of the 
original BIOS. Then the revised system is copied to the destination disk 
with SYSGEN. Let us consider the first part of the SYSGEN operation. 

When copying the system tracks from one disk to another, we saw that 
SYSGEN produces the following message after the system is copied into 
memory from drive A: 

CP/M image in RAM at 900H is ready to write 
or reboot and "SAVE 40 CPMxx.COM" 

Destination drive NAME (or RETURN to reboot) 

Previously, we gave the name of the destination disk. This time, however, 
we terminate SYSGEN with a carriage return. Then we save the SYSGEN 
image (along with SYSGEN itself) as a regular CP/M disk file. In this ex¬ 
ample, SYSGEN tells us that 40 blocks of 256 bytes are needed to save the 
system image, but this number may vary from one system to another. 

After SYSGEN loads the image into memory, we can simply type a car¬ 
nage return to go back to the system level. When the prompt symbol A> 
appears, give the command 

SAVE 40 CPM2.COM 

to save the system image as a file named CPM2.COM. This file contains 
the complete CP/M system and a boot loader if necessary. It also contains 
a copy of SYSGEN at the beginning. 

(Remember that file types are chosen to suggest the nature of a file. 
CP/M uses the file type COM for executable programs. However, the 
system image we just saved is not an executable program, because it con¬ 
tains a copy of SYSGEN at the beginning and the remaining parts are in 
the wrong place. Consequently, it would be more appropriate to choose a 
file type of SYS. This is possible if you use SID, but DDT requires the 
extension COM.) 

We now have a regular CP/M disk file containing an image of the 
original CP/M. We must now reload this system image back into memory 
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with the debugger DDT, so that we can alter it. We are going to load the 
file into memory starting at 100 hex, because that is the normal working 
area of memory. Of course, this is not where the system resides when we 
are using it. 

When the debugger is executed, it copies the system image into memory. 
There are now two copies of the CP/M system in memory (see Figure 2.1). 
The regular working version resides at the top of memory. The duplicate 
version, generated by the SYSGEN operation, temporarily resides in the 
TPA just above SYSGEN. We will refer to these two copies as the working 
version and the SYSGEN version. 

The next step is to place the revised copy of the BIOS over the original 
copy of BIOS in the SYSGEN position. But we first have to determine the 
address of the BIOS or USER area in the SYSGEN version. The debugger 
can help find the location. 

Execute the debugger with a parameter so it will load a copy of the 
system image into memory. Give the command 

DDT CPM2.COM 

Be careful that CPM2.COM is on the default drive when using DDT. 
That is, the command 

A:DDT CPM2.COM 

is acceptable but the following command is not: 

DDT B:CPM2.COM 
This is not a problem with SID. 

When the debugger copies the system image into memory starting at 
100 hex, it gives three numbers. For example: 

NEXT PC END 
2900 0100 ACFF 

Record the number given under the word NEXT (2900 hex in this case). 
This marks the location of the end of the system image. 

The SYSGEN version of the CP/M system we loaded at address 100 hex 
should be the same as the working version. We determined the location of 
the working version of BIOS or USER in the previous section. Now we 
must find the corresponding region for the SYSGEN version. We will use 
the L command for this purpose. 

When the memory image was loaded with the debugger, the NEXT 
address was displayed on the screen. Because this address references the 
end of BIOS, start at 100 hex less than this address. If you do not find the 
vectors, try a smaller address. For example, if the NEXT address was 
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given as 2900, give the command 
L2800 

The response might be as follows: 


2800 

JNZ 

DB35 

2803 

PUSH 

H 

2804 

PUSH 

B 

2805 

LXI 

H,DB18 

2808 

AAV 1 

B,16 

280A 

AAOV 

C,AA 

280B 

CALL 

DAC4 

280E 

INX 

H 

280F 

DCR 

B 

2810 

JNZ 

DB0A 

2813 

POP 

B 

We are looking for a set of jump vectors into BIOS or USER. Obviously, 
this is not it. The jump addresses will be identical to the values we found 
previously for the working version of BIOS. Repeat the operation with an 
address that is 100 hex smaller. For example, if we try 

L2700 



we might find the following: 

2700 

JAAP 

DA1B 

2703 

JAAP 

DA41 

2706 

JAAP 

DA7E 

2709 

JAAP 

DA96 

270C 

JAAP 

DAB6 

270F 

JAAP 

DACC 

2712 

JAAP 

DB8B 

2715 

JAAP 

DBD6 

2718 

JAAP 

DAFC 


This is the set we are looking for. The addresses of the jump vectors match 
the USER addresses we found previously. 

The next step is to calculate the offset (the difference) between the 
SYSGEN location and the working location of BIOS or USER. We use 
the H (for hexadecimal arithmetic) command of DDT or SID. This is an 
undocumented DDT instruction. For this example, the command is 

H270O,DA0O 

This command subtracts DA00 hex from 2700 hex. The debugger 
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responds with both the sum and the difference: 

0100 4D00 

It is the difference that we want, the second value of 4D00 hex. This is the 
value we have to add to the address of the regular assembled code (DA00 
hex) to place the new BIOS or USER instructions into the proper 
SYSGEN area (2700 hex). 

After altering the BIOS. ASM or USER. ASM program, we assemble it 
to produce a corresponding BIOS.HEX or USER.HEX file. We need to 
install this new version in place of the original. The debugger automatically 
loads the HEX file of instructions in its proper place (over the working 
version) if the following two commands are given: 

IUSER.HEX 

R 

(The I command initializes an FCB with the file name USER.HEX. The R 
command reads the corresponding disk file into memory.) 

However, in this case we want to load the file into the SYSGEN area 
rather than the working area. We therefore give the R command with the 
calculated offset: 

IUSER.HEX 

R4D00 

The debugger will now place the HEX file into the desired SYSGEN area 
rather than the working area. 

At this point we have a copy of the original CP/M system in the 
SYSGEN position, except that a revised copy of BIOS has replaced the 
original BIOS. Return to the CP/M system level by typing control-C. You 
can now save the revised memory image with the command 

SAVE 40 CPMREV.COM 

(Be sure to choose a different name than last time so you can distinguish 
the original version from the revised version.) 

Alternatively, you can execute SYSGEN by typing its name. The 
SYSGEN version of CP/M is already in memory. Therefore, just give a 
carriage return to the first SYSGEN question: 

Source drive NAME (or RETURN to skip) 

This will skip the first part of SYSGEN, which reads the system tracks into 
memory. Put the desired diskette into drive B, for example, and type the 
letter B in response to the next question: 

Destination drive NAME (or RETURN to reboot) 
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SYSGEN then repeats your answer: 

Place DESTINATION disk on B, then type RETURN 

When you type another carriage return, the new system image will be written 
onto the system tracks of the diskette in drive B. Of course, any other 
drive can be used. Be sure that the disk has been formatted. 

You can test whether your alteration of the system tracks has been suc¬ 
cessful by turning off the computer and booting up using the new diskette. 

Copying the Altered BIOS from the Working Version 
to Disk Using SYSGEN 

The third method of writing the system tracks of a diskette is similar to 
the second method. In this case we do not use a BIOS or USER file directly. 
Instead, we move a working copy of USER or BIOS down to the SYSGEN 
position. For the above example, we would load the debugger and the 
SYSGEN memory image as before with the command 

DDT CPAA2.COM 

We must determine the BIOS or USER address of the SYSGEN version 
as we did in the previous section. Then give the M (move) command: 

MDAOO, DDFF,2700 

This operation will block move a copy of BIOS or USER from the regular 
working position (DAOO — DDFF) down to the SYSGEN location 
(2700—2A00). We return to the CP/M system by typing control-C, and 
then we execute SYSGEN. Proceed as in the previous section to save the 
memory image of the system on the system tracks of a disk. 

Now that you have a working copy of your BIOS or USER routines, we 
can begin to add some new features. Be sure to keep a copy of the original . 
Then if your current copy refuses to work, you can go back to the original 
and begin again. 


SUMMARY 

In this chapter we have seen how to duplicate a diskette. The steps in¬ 
cluded formatting a new diskette, copying the data regions onto it, and 
copying the system tracks onto it. We also learned how to alter the BIOS 
or USER area of CP/M and how to make the change permanent by writing 
the new version onto the system tracks. We will now be able to add the 
features discussed in the next chapter. 


































































































CHAPTER 3 



INTRODUCTION 

In Chapter 1 we learned that the CP/M basic input/output system 
(BIOS) contains the software needed to operate the peripherals, such as 
the console, the printer, and the disks. In Chapter 2 we learned how to 
access the BIOS or USER area so that it can be modified. In this chapter 
we will study the BIOS in more detail, and we will modify it to incorporate 
several useful features. These include the ability to direct the console out¬ 
put to the printer and to check that the printer is turned on. 

Because only a small amount of memory is allocated for BIOS routines, 
it is necessary to write the programs in assembly language rather than in a 
higher-level language such as BASIC or Pascal. Let us therefore review 
the operation of assemblers. 
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ASSEMBLY LANGUAGE PROGRAMMING 

Assembly language is a low-level computer language in which the in¬ 
structions of a particular CPU are selected directly by a mnemonic opera¬ 
tion code (opcode). The 8080 CPU has three general-purpose, 16-bit 
registers. They are given the names HL, DE, and BC. The complete instruc¬ 
tion sets for both the 8080 and the Z80 CPUs are given in the Appendices. 

Consider, for example, the following operation code: 

JMP D303 

This instruction tells the CPU to branch to address D303 hex. The 
assembler generates the corresponding binary code. Thus there is a one- 
to-one correspondence between an assembly language instruction and the 
CPU operation it generates. 

By contrast, a single instruction in a high-level language, such as Pascal 
or BASIC, usually generates more than one CPU instruction. Although 
each compiler operates differently from the next, the line 

1 = 1+5 

might be converted into the following CPU instructions: 

LXI D, 5 

LHLD 1% 

DAD D 

SHLD 1% 

This sequence of instructions loads the DE register with the value of 5 
and the HL register from the location of 1%. The values in DE and HL are 
added together and the result is placed in HL. The result is then stored in 
the memory location referenced by 1%. 

Assembly language programs are written and altered with one of the 
many CP/M editors, such as ED, WordStar, WordMaster, Magic Wand, 
PMATE, or Benchmark, among others. The resulting source program is 
assembled with an assembler program, then converted into executable 
binary code. The CP/M operating system provides an assembler called 
ASM. This assembler is not suitable for many of the programs in this 
book, however, because it does not incorporate a macro processor. (We 
will begin discussing macros and macro processors in Chapter 4.) There 
are two common CP/M assemblers that do contain a macro processor. 
These are the Microsoft MACRO-80 assembler and the Digital Research 
MAC assembler. Both of these macro assemblers accept the standard Intel 
8080 mnemonics. The Microsoft assembler can also use the Zilog Z80 
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mnemonics directly. The Digital Research assembler can only generate 
the Z80 opcodes with macros. 

A Simple Assembly Language Program 

To ensure that you understand the operation of your assembler and the 
associated programs, we will assemble and execute a very simple program 
in 8080 assembly language. Use a CP/M editor to generate the source pro¬ 
gram shown in Figure 3.1, and give it a file name of BELL. The file type 
should be either ASM for the Digital Research assemblers or MAC for the 
Microsoft assembler. If you are using the Microsoft assembler, omit the 
ORG statement and the apostrophes enclosing the TITLE statement. 
This is one of the few programs you can assemble with the Digital 
Research ASM assembler. Use the file type of ASM, but omit the first line 
beginning with the word TITLE. 

Notice that there are generally four different columns of information in 
the listing of the source program. It is common practice to use the ASCII 
tab character to align these four columns. The Digital Research and 
Microsoft assemblers do not require such an alignment, but it makes the 
source program easier to understand. For a regular operation code, the 
four columns are as follows: 

LABEL: MNEMONIC OPERAND ;comment 

The label consists of alphanumeric characters and is terminated by a 
colon. (The colon is optional for the Digital Research assemblers but re¬ 
quired for the Microsoft assembler.) Program control can be transferred 
to the label from any other part of the program. The mnemonic cor¬ 
responds to the desired CPU instruction; its spelling may differ from one 
assembler to another. The operand is the parameter for the CPU instruc¬ 
tion; it can refer to a CPU register, a constant, or a memory address. The 
comment, which is preceded by a semicolon, documents the instruction. 

Not all lines in the source program contain opcodes. Some lines contain 
assembler directives or pseudo operation codes (pseudo ops) instead. 
These lines do not generate CPU instructions; rather, they are used to 
create constants, set aside memory locations, or give directions to the 
assembler. For example, the first line, 

TITLE 'Ring the console bell' 

directs the assembler to place the indicated title at the top of each page of 
the assembly listing. The directive 


ORG 100H 
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TITLE 'Ring the console bell' 
;(Put current date here) 


ORG 

100H 


;Digita! Research version 

/ 

BEL 

EQU 

7 

;ASCII bell char. 

BDOS 

EQU 

5 

;DOS entry point 

TYPEF 

EQU 

2 

;type char, on console 

/ 

START: 

LXI 

SP,100H 



MVI 

C, TYPEF 



MVI 

E,BEL 



CALL 

BDOS 



JMP 

0 



END 

START 



Figure 3.1: Program BELL to Ring the Console Bell 


sets the address of the assembled code to 100 hex. The next three lines are 
called equates. They define the values of the symbols BEL, BDOS, and 
TYPEF. For example, 

BEL EQU 7 

defines the value of BEL to be 7. We omit the colon at the end of a defini¬ 
tion label because it does not represent a memory location. 

Five lines of the source program in Figure 3.1 actually generate com¬ 
puter instructions. The first instruction sets the stack pointer to 100 hex: 

LXI SPJ00H 

(The stack pointer is a CPU register that refers to a particular region 
of memory. In this example we are initializing the pointer to a value of 
100 hex. However, its value is altered by instructions such as PUSH, 
POP, CALL, and RET.) The second instruction places the value of 2 
(TYPEF) in the C register: 

MVI C, TYPEF 

The third instruction loads the E register with the value of 7 (BEL): 

MVI E,BEL 
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The fourth instruction generates a subroutine call to address 5 (BDOS). 
The fifth instruction branches to address 0. 

The final statement in the program declares the starting address to be 
the label START. 

Program Assembly 

After you have created your source program with the editor, obtain a 
listing and compare it to Figure 3.1. Correct any errors, then assemble the 
program. If you are using the Digital Research MAC or ASM assemblers, 
give the command 

AAAC BELL 

or 

ASM BELL 

For the Microsoft assembler, type 
M 80 = BELL/L 

An assembly listing file named BELL.PRN will be created at this step. 
Compare your assembly listing to Figure 3.2 for the Digital Research 
assemblers or Figure 3.3 for the Microsoft assembler. 

The assembly listing gives the original source program along with the 
corresponding instructions and the addresses where the instructions will 
reside during execution. The instructions and addresses are given in hex¬ 
adecimal notation. Instructions such as JMP and CALL, which refer to 
memory locations, are three bytes long. The second and third bytes contain 
the memory address. The low half of the address is stored in the second 
byte and the high half is stored in the third byte. That is, the two bytes of 
the address appear to be reversed. The Digital Research assembler gives 
the address in this reversed order. For example, a call to BDOS at address 
0005 looks like this: 

CD0500 CALL BDOS /Digital Research version 

However, it is more natural to think of a two-byte address as the high byte 
followed by the low byte. As a consequence, the Microsoft assembler 
gives the address with the high byte shown first. Thus a call to BDOS 
looks like this: 

CD 0005 CALL BDOS /Microsoft version 

It must be remembered that the sequence of bytes in memory matches the 
Digital Research order rather than the Microsoft order. 
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TITLE 

'Ring the console bell' 

0100 

;(Current date) 
ORG 100H 

;Digita 1 Research version 

0007 = 

/ 

BEL 

EQU 

7 ;ASCII bell char. 

0005 = 

BDOS 

EQU 

5 ;DOS entry point 

0002 = 

TYPEF 

EQU 

2 ;type char, on console 

0100 310001 

/ 

START: 

LXI 

SP, 100H 

0103 0E02 


MVI 

C, TYPEF 

0105 1E07 


MVI 

E,BEL 

0107 CD0500 


CALL 

BDOS 

010A C30000 


JMP 

0 

010D 

/ 

END 

START 


Figure 3.2: Digital Research Assembly Listing for Figure 3.1 


The next step is to run the program. However, we cannot do this just 
yet, because the assembler has not created an executable file. The Digital 
Research assembler has generated an ASCII hexadecimal file called 
BELL.HEX. This HEX file can be converted into an executable file named 
BELL.COM by giving the command 

LOAD BELL 

(LOAD is a program that is included with the CP/M operating system.) 
Now give the command 

BELL 

to execute the program. The console bell should sound, and control will 
return to the CP/M operating system. 

The Microsoft assembler, on the other hand, creates a REL file, which 
must be processed differently. It is possible to create a HEX file from 
a Microsoft REL file, but it is simpler to convert the REL file into an 
executable file with the linking loader L80. For example, the program 
BELL.REL can be executed with the command 

L80 BELL/G 

This command will generate a binary file, starting at memory location 100 
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TITLE 

Ring the console bell 




;(Current date) 



0007 


/ 

BEL 

EQU 

7 

;ASCII bell char. 

0005 


BDOS 

EQU 

5 

;DOS entry point 

0002 


TYPEF 

EQU 

2 

;type char, on console 

0000' 


START: 




0000' 

31 0100 


LXI 

SPJ00H 


0003' 

0E 02 


MV 1 

Q TYPEF 


0005' 

IE 07 


MVI 

E,BEL 


0007' 

CD 0005 


CALL 

BDOS 


000A' 

C3 0000 


JMP 

0 




/ 

END 

START 



Figure 3.3: Microsoft Assembly Listing for Figure 3.1 


hex, and execute it. After the program has finished execution and the 
CP/M prompt is displayed, type 

SAVE 1 BELL.COM 

(We learned in Chapter 2 that L80 tells us the number of blocks to save.) 
This will save the executable memory image. The program can be run 
again by typing the name BELL. In Chapter 1 we created a program called 
CONTIN, which we can execute to rerun BELL since the memory image 
is still intact. 

It is also possible to create a COM file with L80. For example, the 
command 

L80 BELL/N, BELL/E 

will generate a disk file named BELL.COM and then exit to CP/M. The 
program can be run by typing the name BELL. 

We can now prepare to alter the BIOS. 

BIOS ENTRY VECTORS 

We learned in Chapter 2 that there is a series of vectors at the beginning 
of the BIOS that gives the addresses of the corresponding routines within 
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the BIOS. We also learned that some versions of CP/M incorporate an 
extension to the BIOS called USER. In those cases the BIOS contains the 
disk operation routines and the USER area contains the remaining 
routines. There is one set of vectors at the beginning of the BIOS and a 
second set of vectors at the beginning of the USER area. The vectors at 
the beginning of the BIOS that relate to disk operations will point into 
BIOS. The remaining vectors, which refer to console and printer opera¬ 
tion, will generally refer to a matched set of vectors at the beginning of 
the USER area. 

Vectors at the beginning of BIOS are shown in Figure 3.4. The first vec¬ 
tor is called the cold-start entry. It is used during the initial startup of 
CP/M. The second vector is used at the completion of major tasks; it is 
called the warm-start vector. Vectors for the four logical devices, the con¬ 
sole, reader, punch, and list, appear next. These four devices are referenced 
by the following symbols: 

CON: Console (input and output) 

RDR: Reader (input) 

PUN: Punch (output) 

LST: List or printer (output) 

Notice that the symbolic names for logical devices end in a colon. This is 
consistent with the naming of disk drives as A:, B:, etc. By this means, a 
device name can be distinguished from a disk file name. For example, the 
name PUN refers to a disk file, whereas PUN: refers to the logical punch 
device. 

Exploring the BIOS Vectors with the Debugger 

In Chapter 2 we located the BIOS jump vectors by using the debugger. 
If you have not already performed this task, you should do so at this time. 

Recall that we executed the debugger and gave the command 

LO (the letter L followed by a zero) 

The expected response is something like this: 

0000 JMP D303 

0003 NOP 
0004 NOP 
0005 JAAP AD00 


The branch at address 0 references the warm-start entry into BIOS. 
Thus, for this system BIOS begins at address D300 hex. The branch at 
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BIOS 

JMP 

COLD 

/‘initial cold start 

BIOS+ 3 

JMP 

WARM 

;warm-start reset 

BIOS+6 

JMP 

CSTAT 

/console status 

BIOS+9 

JMP 

CON IN 

/console input 

BIOS+12 

JMP 

CONOUT 

/console output 

BIOS+15 

JMP 

LIST 

/printer output 

BIOS+18 

JMP 

PUNCH 

/punch output 

BIOS+ 21 

JMP 

READER 

/alternate input device 


Figure 3.4: The First Eight CP/M BIOS Vectors 


address 5 is usually the BDOS entry; we used this location to ring the con¬ 
sole bell in the program BELL. Now, however, the address stored at loca¬ 
tion 5 has been altered by the debugger. That is, the normal BDOS address 
for this system is C506 hex, but in this example the debugger changed it to 
ADOO hex. 

When DDT (or SID) is executed, CP/M copies the program into 
memory at the beginning of the TPA and branches to it. The debugger 
then relocates itself into high memory. This allows another program (the 
one to be debugged) to be loaded into the TPA and run under the control 
of the debugger. However, the debugger needs to intercept BDOS calls 
made by the program it is studying. Consequently, it changes the BDOS 
address stored at location 5. 

After finding the location of BIOS, we can disassemble the vectors at 
the beginning of BIOS by giving (in this example) the debugger command 
LD300. The response might be as follows: 


D300 

JAAP 

D380 

(initial cold start) 

D303 

JAAP 

D39F 

(warm-start reset) 

D306 

JAAP 

DA06 

(console status) 

D309 

JAAP 

DA09 

(console input) 

D30C 

JAAP 

D4E6 

(console output) 

D30F 

JAAP 

DAOF 

(printer output) 

D312 

JAAP 

DAI 2 

(punch output) 

D315 

JAAP 

DAI 5 

(alternate input device) 

D318 

JAAP 

D4CA 

(beginning of disk routines) 

D31B 

JAAP 

D499 

D31E 

JAAP 

D4CC 



We saw in Chapter 2 that there might be a second set of jump vectors in 
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a separate region of memory known as the USER area. For the above ex¬ 
ample, the USER area starts at address DAOO hex. If we examine this area 
with the debugger command LDAOO, the following response might appear. 


DAOO 

JMP 

DA1B 

(initial cold start) 

DA03 

JMP 

DA41 

(warm-start reset) 

DA06 

JMP 

DA7E 

(console status) 

DA09 

JMP 

DA96 

(console input) 

DAOC 

JMP 

DAB6 

(console output) 

DAOF 

JMP 

DACC 

(printer output) 

DAI 2 

JMP 

DB8B 

(punch output) 

DAI 5 

JMP 

DBD6 

(alternate input device) 


In the following sections we will be interested in the vectors at addresses 
DAOC and DAOF, which branch to the routines that operate the console 
and the printer. 


ENGAGING THE PRINTER WITH THE DEBUGGER 

Sometimes it is desirable to reproduce console output on the CP/M 
printer (list device). This can be accomplished by typing control-P during 
console input. However, an executing program cannot engage a printer in 
this way. Nevertheless, it is sometimes desirable for a program to be able 
to engage the printer. In the next section we will write a short program to 
accomplish this task; but first we will perform the feat more directly, using 
the debugger. 

Notice that the vector pointing to the printer routine (at address DAOb 
in the above list) immediately follows the vector for console output (at ad¬ 
dress DAOC). By changing the console output jump instruction to a call 
instruction, we can activate console and printer output simultaneously. 
We will make this change with the debugger. This type of operation is 
sometimes called a patch. You must be very careful with this step, because 
you are actually changing the BIOS. You are only going to change one 
byte, but you must not use the wrong value or change the wrong byte. 
Otherwise, CP/M will not respond to your commands or it may do 

strange things. . 

Use the debugger command A (for assemble) to change the location ot 

DAOC (in this example): 

ADAOC (you type this) 

DAOC CALL DAB6 (you type CALL DAB6) 

DAOF (you type a carriage return) 
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In this example, we used the debugger to engage the printer by changing a 
jump instruction to a call instruction. Any executing program (except 
Microsoft BASIC) can also use this technique. 

Alternatively, we can use the debugger command S (for set) to change 
the jump instruction (C3 hex) to a call instruction (CD hex). The com¬ 
mands are as follows: 

SDAOC (you type this) 

DAOC C3 CD (you type CD) 

DAOD B6 . (you type a period) 

From now on, the printer should display the same information as the con¬ 
sole screen. We can return the BIOS to its original condition by changing 
the call instruction back to a jump instruction. (If something has gone 
wrong and CP/M no longer works, just perform a cold boot. You may 
have to turn the computer off and on again to get it working.) Let us now 
automate this patching operation. 


A PROGRAM TO ENGAGE AND DISENGAGE 
THE PRINTER 

We can make the process of engaging and disengaging the printer under 
computer control easier by using two programs to do the patching. 
Because these programs are so short, we will create them with the debugger 
rather than with the assembler. Load the debugger and give the command 
A100 to assemble a program starting at 100 hex. Then type the following 
instructions: 

LHLD 1 
LXI D,9 

DAD D 
MVI M,CD 

RET 

Type an extra carriage return to terminate this step. 

After this short program has been written, disassemble it by giving the 
command LI00. The result should look like this: 


0100 

LHLD 

0001 

0103 

LXI 

D,0009 

0106 

DAD 

D 

0107 

MVI 

M,CD 

0109 

RET 
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Return to CP/M by typing control-C. Save the program: 

SAVE 1 LISTON.COM 

Before you run this program, create the complementary program to restore 
the BIOS vector to its original state. Load LISTON with the debugger: 

DDT LISTON.COM 

Change the call instruction at location 108 hex, the second operand of the 
MVI instruction, to a jump instruction (C3 hex). (Use an S108 command 
to deposit the value of C3 or enter the instruction ‘MVI M,C3’ with an 
A107 command.) Return to CP/M and save the second program with the 
command 

SAVE 1 LISTOFF.COM 

When LISTON is executed, the first instruction loads the BIOS warm- 
start address into the HL register. (Recall that address 0 contains the jump 
instruction and addresses 1 and 2 contain the warm-start address.) The 
second instruction loads the DE register with the value of 9, the difference 
between the warm-start entry and the console-output entry. The third in¬ 
struction adds the HL and DE registers, placing the sum in HL. The HL 
register now refers to the console-output vector. The fourth operation 
places a call instruction (CD hex) over the console-output jump instruc¬ 
tion. The final instruction returns to the system level of CP/M. 

Because hexadecimal is the default mode of the debugger, we can enter 
hex data without the suffix H. By contrast, decimal is usually the default 
mode for an assembler. 

To test these programs, turn on the printer and give the CP/M command 
LISTON 
followed by 
DIR 

The directory listing should appear at both the console and the printer. 
Then give the commands 

LISTOFF 

DIR 

The directory listing should appear only at the console. 

These two short programs are more useful for the insight they give into 
the workings of CP/M than for their actual operation. In fact, they will 
not always work as expected. In particular, they will not operate with 
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Microsoft BASIC. We will now alter the BIOS so the printer can be 
engaged by changing the value of the IOBYTE. (Refer to Chapter 2 for a 
review of how to access and alter the BIOS or USER routines.) 

ENGAGING THE PRINTER WITH THE CP/M IOBYTE 

We learned that the BIOS provides vectors to the operation of the four 
logical peripherals: console, reader, punch, and printer. CP/M provides 
a mechanism for mapping these four logical devices to 16 physical 
devices. That is, each of the four logical devices can be assigned to as 
many as four different actual devices. At any time, the current 
assignments for the four logical devices are coded in a single byte located 
at address 3. The two low-order bits hold the console assignment, the next 
two refer to the reader, the two after that refer to the punch, and the two 
high-order bits hold the printer assignment. 

While the IOBYTE feature can be used to map the four logical 
peripherals to 16 actual devices, it is not necessary to implement all these 
capabilities. Each part can be added as a single step, greatly simplifying 
the process. The IOBYTE feature can be useful even if the console and the 
printer are the only peripherals. 

Let us begin with a simple implementation of the IOBYTE—engaging 
and disengaging the printer. We will designate the low-order bit of the 
IOBYTE at address 3 as a printer switch. If this bit has a value of 1, the 
printer will display console output. Otherwise, the printer will not respond 
to console output. Of course, the printer can still be engaged by typing 
control-P in the usual way. Furthermore, the video screen will always 
display the console output, whether or not the printer is engaged. 

The first thing we have to do is ensure that the IOBYTE is properly ini¬ 
tialized. Look at the BIOS assembly listing and locate the first jump vector. 
This will be the first executable statement near the beginning of the pro¬ 
gram. Now find the referenced address and follow the instructions until a 
return statement is encountered. Somewhere in this section there may be 
statements like the following: 


COLD: 


MVI 

A,0 


STA 

3 

COLD: 


MVI 

A.INITAL 


STA 

IOBYTE 
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In the second example the value of INITAL is defined as 0 and the 
IOBYTE is set to a value of 3. If you cannot find such a passage, insert the 
equivalent instructions with the system editor. Be sure to define the sym¬ 
bols INITAL and IOBYTE if you use the second form. For example: 

INITAL EQU 0 
IOBYTE EQU 3 

The next step is to alter the console-output routine. Look at the BIOS 
assembly listing and locate the console-output vector (XXOC hex) and the 
list-output vector (XXOF hex). These are the fifth and sixth vectors in the 
list. Note the labels used as the operands. They might be something like 
this: 

XXOC JMP CONOUT 
XXOF JMP LIST 

Go to the location of CONOUT and insert the following code at the very 
beginning: 


CONOUT: 



;console output 


LDA 

IOBYTE 

;get the value 


ANI 

1 

;mask for bit 0 

CON02: 

CNZ 

LISTT 

;printer output 
;regular console output 


The first instruction loads the accumulator from memory address 3, the 
location of the IOBYTE: 

LDA IOBYTE 

The second instruction performs a logical AND with *he accumulator and 
the value of 1: 

ANI 1 

This masking AND operation resets (zeros) all but the low-order bit 
(bit 0) of the accumulator. The operation also alters the zero flag of the 
CPU accordingly. That is, the zero flag is set if the low-order bit is zero. It 
is reset otherwise. 

The third instruction tells the CPU to call the printer subroutine at 
LISTT if the zero flag is reset (the low-order bit is not zero): 

CNZ LISTT 

Be sure to include the label C0N02. We will need it for a later program 
in this chapter. Also notice that the branch to the printer routine is called 
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LISTT. This is necessary to distinguish the logical list from the physical 
list. Find the location of the label LIST. If an opcode also appears on this 
line, split the line in two so that the label is on a line by itself. Add the label 
LISTT: on the line immediately following the label LIST. 

Put today’s date as a comment statement near the beginning of the 
source program. 


Changing the IOBYTE with the System Debugger 

Assemble the new version and load it into memory with the debugger. 
Check the IOBYTE at address 3 to see that it has a value of 0. Give the 
debugger command S3. The response will be 

0003 X 

where X is the value of the IOBYTE. If this value is 0, enter a period to ter¬ 
minate this step. Otherwise, enter the value of 0. Turn on the printer, and 

with the S command of the debugger, change memory address 3 to a value 
of 1: 

S3 (you type this) 

0003 0 1 (type a 1) 

0004 0 . (type a period) 

The last line above should be displayed on the printer as well as on the con¬ 
sole screen, because the IOBYTE is now 1. Try some other commands 
such as 


DO 

The printer should again follow the console screen. Change the IOBYTE 
back to 0 with the S command. The printer should no longer repeat the 
console output. You must now copy the new BIOS version to the system 
tracks if you want to make it permanent. Of course, it should still be possi¬ 
ble to turn on the printer with a control-P command. 


Changing the IOBYTE in BASIC 

Now we will try out this method with Microsoft BASIC. Load BASIC 
and write a short program such as the one we used in Chapter 1: 

10 FOR K = 1 TO 9 
20 PRINT K, 1/K, K*K 
30 NEXT K 
40 END 
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Then run the program. The results will appear on the console. Turn on the 
printer and give the following commands: 

POKE 3,1 
RUN 

The BASIC POKE command will change the IOBYTE to a value of 1. 
When the program is run, output will appear at the printer as well as the 

We have already noted that Microsoft BASIC will not allow the printer 
to be engaged with control-P or with the LISTON program. Now we have 
a method of performing this task. The printer can be disengaged with the 
BASIC command 
POKE 3,0 

Return to CP/M with a SYSTEM command. 


Ch angin g the IOBYTE with ST AT 

We have learned how to change the IOBYTE at address 3 with the 
system debugger or in BASIC. It is also possible to change the IOBYTE 

with ST AT. txt a 

We have seen that the four logical devices CON:, RDR:, PUN:, and 

LST- are each allocated two bits of the IOBYTE. Four separate physical 
devices can be assigned to each of these logical devices through changes in 
the IOBYTE ST AT has 16 names coded into it for this purpose. The 16 
names are given in Table 3.1. You can get STAT to display this table by 
giving the command 
STAT VAL: 

The IOBYTE can be changed from 0 to 1 by typing the command 
STAT CON: = CRT: 

STAT will change the IOBYTE back to 0 with the command 
STAT CON:=TTY: 


Changing the STAT Device Names The names for the four logical 
devices were chosen years ago when teletypewriters (TTY) were common. 
It might be more meaningful now to change them to something else. For 
example, TTY: could be changed to CRT: and CRT: could be changed to 
LST:. This change is easily accomplished with the system debugger. 
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Table 3.1: ST A T's Name for the Four Logical Devices 


Bits 

00 01 10 11 


CON 

RDR 

PUN 

LST: 


TTY 

TTY 

TTY 

TTY 


CRT 

PTR 

PTP 

CRT 


BAT 

UR1 

UP1 

LPT 


UC1 

UR2 

UP2 

UL1 


Copy STAT into memory with the command 
DDT STAT.COM 

Look at the first part of STAT with the command 
D100 

The ASCII representation of the data on the right side of the screen shows 
the four logical device names, CON:, RDR:, PUN:, and LST:, starting at 
address 139 hex. The 16 physical device names are encoded starting at ad¬ 
dress 159 hex. You can change the names of the first two physical devices 
with the SID command: 

SI59 (you type this) 

159 54 "CRT:LST (you start typing with the quote) 

160 3A . (you type a period) 

If you are using DDT, you will have to enter the hexadecimal equivalent 
of the ASCII characters with the S command. The ASCII characters and 
their corresponding hexadecimal values are as follows: 

ASCII CRT: LST 

Hex 43 52 54 3A 4C 53 54 

You type the command SI 59 as with SID. Then you type the seven hex 
numbers in the following display: 


159 

54 

43 

15A 

54 

52 

15B 

59 

54 

15C 

3A 

3A 

15D 

43 

4C 

15E 

52 

53 

15F 

54 

54 

160 

3A 

. 


(you finish with a period) 
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Return to CP/M and save the correct amount of memory with a new 
name such as STAT2.COM. Try changing the IOBYTE from 0 to 1 by 
giving the command 

STAT2 CON: = LST: 

Printer output should now duplicate the console. Disengage the printer 
with the complementary command 

STAT2 CON: = CRT: 

We could use this method to change some of the other device names in 
STAT. 

We will now add some new features to the printer routine in BIOS. 


ADDING A PRINTER-READY ROUTINE 

Computers communicate with peripherals through input/output 
registers or ports. A common arrangement uses a bidirectional data 
register for transferring the information and a separate, bidirectional 
status register to indicate the state of readiness. With this technique, the 
status register is automatically reset to a not-ready condition each time the 
CPU places a byte in the data register. 

Sometimes the CPU incorporates a special signal line for servicing 
peripherals. Using this line a peripheral can interrupt the CPU to request 
service. A more common method for communicating with the peripherals 
is called the looping method. With this technique, the computer checks 
the status register to see if the device is ready. The status register is 
repeatedly checked by looping through the necessary statements. When 
the status register indicates that the peripheral is ready, the computer per¬ 
forms the transfer and then goes on to something else. 

Let us consider the looping method for a printer-output routine. The 
instructions in BIOS might look like this: 

LIST: 

LISTT: 

IN 5 

ANI 1 

JZ LISTT 

In this example, the status register has an address of 5 and the least 
significant bit is used as the ready flag. The 8080 instruction IN 5 reads 
the status port. The following instruction, ANI 1, performs a logical 
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operation on the accumulator. The result is zero if the peripheral is not 
ready. Consequently, the third instruction, JZ LISTT, causes a branch to 
the top of the three-instruction loop. Looping around the above three 
instructions continues until the peripheral is ready. When the ready 
bit indicates that the peripheral has finished its task, the instructions 
following JZ LISTT are executed. The computer sends another byte to 
the data port and then returns. The computer operates much faster than 
die peripheral, so much of its time is spent looping around the above three 
instructions. 

The looping method works satisfactorily if the printer is actually turned 
on. Unfortunately, if the printer is turned off, the data-ready flag will 
usually tell the computer to send more data anyway. The computer then 
sends the data to a printer that is not doing anything. Therefore, we must 
consider two separate items—whether the printer is turned on and 
whether the last byte has been printed. We have been considering the latter 
now we must consider the former. 

There may be an easy solution to this problem. We have been looking at 
only one of the eight bits of the status register, the one that indicates 
whether the printer buffer is empty. Many computers use another bit of 
the status register to indicate whether the peripheral is turned on. This is 
called the data-terminal-ready (DTR) bit. 


Locating the Bit for Data Terminal Ready 

The assembly language program given in Figure 3.5 can be used to 
determine whether your printer status port has a DTR bit. For the standard 
RS-232 serial port, the DTR signal is usually assigned to pin 20. However, 
pin 11 is sometimes used for this purpose. Consequently, you may have to 
move one of the wires in the printer cable. 

Create a source file with the program given in Figure 3.5. Check your 
BIOS or USER listing to find the address of your printer’s status register, 
and change the value of PORT to the address of your printer’s status port! 
Assemble the program and execute it. Remember to omit the ORG state¬ 
ment if you are using the Microsoft assembler. The program will read 
the status port and display the value on the console in binary notation. If 
your printer is off, turn it on; if it is on, turn it off. If any of the bits 
change, the new value will be printed on the screen. For some printers it 

may take as long as one minute for the bit to change after the printer 
switch is turned off. 

Continue in this way, alternately turning the printer on and off. If you 
find a bit changing, make a note of which bit changes and the sense of its 
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TITLE 'Display I/O port in binary 

/ 

;(Put current date here) 


ORG 100H 

PORT EQU 

5 

;status port 

BDOS EQU 

5 


TYPEF EQU 

2 

;console output 

CSTATF EQU 

11 

;console status 

CR EQU 

13 

;carriage return 

LF EQU 

10 

;line feed 

START: 

LXI 

SP, STACK 


IN 

PORT 

;read 

MOV 

H,A 

;save 

CALL 

BITS 

;show binary 

NEXT: 

IN 

PORT 

;next sampling 

MOV 

L,A 

;save 

CMP 

H 

different? 

JNZ 

SHOW 

;yes 

PUSH 

H 


MVI 

C,CSTATF 

;console status 

CALL 

BDOS 


POP 

H 


RRC 


;check bit 0 

JC 

0 

;quit 

JMP 

NEXT 


SHOW: 

CALL 

BITS 

;show binary 

MOV 

H,L 

;switch 

JMP 

NEXT 


BITS: 


;convert binary to ASCII 

MOV 

C,A 


MVI 

B,8 

;8 bits 

BIT2: 

MOV 

A,C 



Figure 3.5: Program to Locate the Bit for Data Terminal Ready 
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ADD 

A 

;shift left 


MOV 

C,A 



MVI 

A,0 

;zero 


ACI 

'O' 

;carry + ASCII 0 


CALL 

OUTT 


DCR 

B 

;count 

CRLF: 

JNZ 

BIT2 

;8 times 

MVI 

A ( CR 

/carriage return, line feed 



CALL 

OUTT 



MVI 

A,LF 


OUTT: 

PUSH 

H 

/console output 


PUSH 

B 



PUSH 

PSW 



MVI 

CJYPEF 

/console print 


MOV 

E/A 


CALL 

BDOS 



POP 

PSW 



POP 

B 



POP 

H 



RET 



STACK: 

DS 

12 

/stack space 


END 

START 



Figure 3.5 (continued) 


logic (0 or 1) when the printer is off. For example, suppose that the result 
is as follows: 

10110111 (printer on) 

00110111 (printer off) 

In this example, bit 7 (the high-order bit) indicates that the printer is 
ready (DTR) when it is set to 1. The bit is reset to 0 when the printer is off. 
For this port, bit 0 indicates whether the printer buffer is empty. If the 
printer is turned on but busy, the bit pattern is 

10110110 (printer on) 

When the printer is ready to receive another byte, the pattern is 
10110111 (printer on) 
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You can terminate the program by pressing any console key. 

Let us see how this program works. We begin with the usual TITLE, 
ORG, and EQU directives. The status register in this example has a value 

The actual instructions begin with the label START. The stack is placed 
at the end of the program, rather than at 100 hex as in the program shown 
in Figure 3.1. The status register is read into the accumulator and then 
moved into the H register. The value is displayed on the console by calling 

subroutine BITS. . ...... 

The port is then read again, but this time the value is placed mto the L 
register The two values are compared. If they are different, the new value 
is displayed by calling subroutine BITS again. Then the new value is moved 
into the H register. If the values are the same, nothing is displayed. 
However, the console status is checked to see if the program is to be ter¬ 
minated. If not, the program loops repeatedly. 

Subroutine BITS converts a binary number in the accumulator to a string 
of eight ASCII zeros and ones and then displays the result on the console. 
The routine moves the byte into the C register and initializes register B to a 
value of 8, the number of characters to be displayed. 

The loop beginning at BIT2 is then executed eight times. On each pass 
through the loop, the current value of the byte is added to itself with the 
ADD A instruction. This action performs a logical shift left. The bits of 
the accumulator are each moved one position. The original high-order bit 
moves into the carry flag. The low-order bit is zeroed. The new value is 

saved in the C register for the next step. .... 

At this point, the carry flag is set to 1 if the original high-order bit had a 
value of 1. It is reset to 0 if the value was 0. We will display the value of 1 if 
the carry flag is set; we will display a 0 otherwise. This is accomplished by 
zeroing the accumulator. We then add an ASCII zero and the carry flag. 
The instructions are as follows: 

AAVI A,0 ;zero accumulator 
ACI 'O' ;carry + ASCII zero 

Let us go through the first two loops of the algorithm with an example. 
Consider the binary number 10101010 (AA hex). When this number is 
added to itself, the result is 01010100 and the carry flag is set to 1. 
Our algorithm will display a 1. The next addition will produce the 
binary number 10101000 and reset the carry flag to 0. The routine displays 
a 0 this time. 

This algorithm can be used with both an 8080 and a Z80 CPU, but it can 
be implemented more effectively on a Z80 computer by performing the 
logical shift directly in the C register. All of the common algorithms for 
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base conversion can be found elsewhere.* 

If you found a printer-ready bit, the next section will show you how to 
incorporate a test for DTR into your BIOS. 


Checking for Printer Ready 

As noted above, not all computers incorporate a DTR bit. However, if 
you have discovered a printer-ready bit, you can include a test in your 
BIOS that will notify you when there is printer output but the printer is 
turned off. This test checks the printer-ready flag. If it indicates that the 
printer is off, the console bell will sound and an appropriate message will 
be displayed. When the printer is turned on, the instruction following this 
portion (the usual test that the printer buffer is empty) will be executed. 

Suppose that the printer status port is given the name LSTATP, the 
data-terminal-ready mask is given the name DTRMSK, and the regular 
port-ready mask is called LMSK. The physical console-output routine is 
referenced as C0N02, because we want to distinguish physical console 
output from logical console output. The original list routine might look 
like that in Figure 3.6, while the new version will look like that in Figure 3.7. 

The first three lines of the new version define the symbols CR (carriage 
return), LF (line feed), and BEL (console bell). Then the executable code 
begins. The printer status port (LSTATP) is read. All of the bits, except 
tor the DTR bit, are zeroed with the ANI DTRMSK instruction. If this 
bit is set, the zero flag will be reset. The instruction 

JNZ LIST2 

branches to LIST2, the original printer-output routine. 

But if the DTR bit is reset to 0, it indicates that the printer is turned off. 
In this case the console bell sounds and the message 

TURN PRINTER ON 

is displayed on the console. The status port is monitored again starting 
with the label LIST3. The program continually loops around the next 
three instructions until the printer is turned on. At that time, the program 
continues with the printer-output routine. 

.Incorporate the new passage into your BIOS. Assemble it and load it 
with the debugger. Engage the printer with control-P and give the DIR 
command. While the printer is working, turn it off. The console bell will 


A. R. Miller, 8080/Z80 Assembly Language' 
gramming, New York: Wiley, 1981. 


Techniques for Improved Pro- 
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LIST: 


;logical list output 

LISTT: 



IN 

LSTATP 

;check status 

ANI 

LMSK 

;mask for output 

JZ 

LISTT 

;loop until ready 

MOV 

A,C 


OUT 

LDATAP 

;send 

RET 




Figure 3.6: Original Version of a Typical Printer Routine 


sound and the message 

TURN PRINTER ON 

will appear on the console. When the printer is turned on again, the output 
should take up where it left off. This routine will work correctly even 
within programs such as WordStar and BASIC (except, of course, that 
different commands are used to engage the printer). 


DIRECTING LIST OUTPUT WITH THE IOBYTE 

Earlier in this chapter we incorporated the IOBYTE int ° ^insole- 
output routine. That feature used the two low-order bits of the IOBYTE. 
We will now add several new features to the logical list output using the 

two high-order bits of the IOBYTE. 

One of the features we will add is relatively easy to install. Sometimes 
called a “bit bucket,” this routine is useful when a program with a long 
output must be tested, but the output itself is not wanted. In addition to 
this, we will be able to direct the list output to the printer, as is usually the 
case, to the console, or to a separate memory area. 

We reserve an IOBYTE value of 0 for the usual output to the printer. 
The value of 40 hex sends list output to the console, and the value of 80 hex 
discards the data—that is, the data disappear. An IOBYTE value of CO 
hex will be allocated at this time for storing list output in a separate 
memory area called a cache. However, we will not actually add the routine 
until later. The list assignments follow; they should be coded into the 
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CR 

EQU 

13 

/carriage return 

LF 

EQU 

10 

/line feed 

BEL 

EQU 

7 

/ASCII bell 

LIST: 




LISTT: 





IN 

LSTATP 

/check status 


ANI 

DTRMSK 

/printer on? 


JNZ 

LIST2 

;yes 


PUSH 

H 

/printer off 


PUSH 

B 



LXI 

H,MESG 

/location 


MVI 

B,AROUND-MESG 

/length 

LLOOP: 





MOV 

C,M 



CALL 

C0N02 

/send to console 


INX 

H 

/pointer 


DCR 

B 

/count 


JNZ 

LLOOP 

/keep going 


POP 

B 



POP 

H 


MESG: 

JMP 

AROUND 

/the message 


DB 

BEL,CR,LF 



DB 

' TURN PRINTER ON 

',CR,LF 

AROUND: 




LIST3: 





IN 

LSTATP 



ANI 

DTRMSK 

/printer on? 


JZ 

LIST3 

/no 

LIST2: 





IN 

LSTATP 

/check status 

I 

ANI 

LMSK 

/mask for output 


JZ 

MOV 

LISTT 

A,C 

/loop until ready 


OUT 

LDATAP 

/send 

1 

RET 




Figure 3.7: Revised Version of a Typical Printer Routine 
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BIOS source program as comments. 
IOBYTE Action 


00 

40 

80 

CO 


Printer output 
Console output 
Bit bucket 


Memory cache 


The list output routine begins with the following statements: 


;logical 

;physical 


LIST: 

LISTT: 


IN LSTATP ;check status 


LIST refers to the logical output and LISTT refers to the physical printer. 
We will now insert instructions between these two labels. 

We must include a test of the IOBYTE at the beginning of the list- 
output routine, just as we did for the console-output routine. The new in¬ 
structions will be placed between the labels LIST and LISTT. First we 
read the IOBYTE. Then, because we are only interested in the two high- 
order bits, we perform a masking AND with the value of CO hex. This 
operation zeros the six low-order bits. If the result is 0, output is sent to 
the printer. If the result is 40 hex, output is sent to the console. If the result 
is 80 hex, the subroutine simply returns to the calling program—that is, no 
action is performed. The last possibility, CO hex, indicates that list output 
is to be stored in a memory cache. We will not incorporate this feature 
now, so we will simply return to the calling program. The source program 

for this feature is shown in Figure 3.8. 

Notice that when the value of the IOBYTE is 40 hex, the list output is 
sent to the label C0N02 rather than to the logical console-output label of 
CONOUT. This ensures that list output destined for the console will not 
be diverted back to the printer if the low-order bit of the IOBYTE is set. 

Assemble these instructions into your BIOS or USER area. Load the 
new version into memory with the debugger and try it out. Change the 
IOBYTE with the debugger, setting it to a value of 40 hex. Engage the list 
output with control-P. Each character should now be displayed twice on 
the console, because both the logical console and logical list are directed to 
the physical console. Disengage the list with another control-P. If you are 
satisfied with the new version, use SAVEUSER or SYSGEN to save a 
copy on the system tracks of a diskette. 

We will now add a routine to store the list output in a memory cache. 
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LIST: 

LDA 

IOBYTE 

;logical list output 


ANI 

OCOH 

;mask for bits 6,7 


JZ 

LISTT 

;printer output 


CPI 

40H 



JZ 

C0N02 

;console output 


CPI 

80H 



RZ 


;bit bucket 

/ 

;add 

memory 

cache routine 

here 

/ 

RET 


;(for now) 

LISTT: 



'•physical list output 


Figure 3.8: Incorporating the IOBYTE into Printer Output 


STORING LIST OUTPUT IN A MEMORY CACHE 

There are times when it is desirable to store the list output in a memory 
buffer or cache rather than send it to the printer. The result can then be 
saved as a disk file for editing or for incorporation into a report. In fact, 
all of the computer outputs in this book were obtained in this manner. 

The operation of the memory cache is managed with two pointers. The 
first pointer indicates where the next byte is to be placed. This pointer is 
initially set to the beginning of the buffer and is incremented each time a 
byte is added to the buffer. At the conclusion of the task a 1A hex, end-of- 
file mark is placed at the end of the text, the second pointer is set to the end 
of the file, and the first pointer is reset to the beginning of the buffer. The 
two pointers are stored immediately in front of the buffer; they are each 
two-byte values. 

We must choose a region for the buffer area that will never be used by 
the CP/M operating system. Otherwise, the cache may be accidentally 
overwritten. There are several ways to accomplish this. For example, a 
North Star Horizon computer uses the region from E800 to EBFF hex for 
the disk-controller memory. Because CP/M requires a contiguous block 
of memory, the maximum CP/M address for this machine is E7FF hex. 
Therefore, the memory region from F000 to FFFF hex is free. Another 
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possibility is to create a smaller CP/M system with MOVCPM. The 
region of memory above CP/M can then be used for the memory cache. 

In the previous section we allocated the IOBYTE value of CO hex to in¬ 
dicate that list output will be stored in a memory buffer. We will now write 
the routines necessary for this feature. We select the region F000 to FFFF 
(the top 4K bytes) as the memory block. The two pointers are stored at 
F000 and F002 hex. The memory buffer itself begins at F004 hex. 

There is another complication we should consider. The buffer will 
overflow if too many bytes are entered into it. The pointer will attempt to 
go beyond the end of the buffer, address FFFF hex in this case. When 
FFFF hex, the largest 16-bit number, is incremented, the result is 0. Thus, 
the pointer now refers to the beginning of memory rather than the end. 
(This phenomenon is known as wrap around.) As we saw in Chapter 1, 
CP/M maintains several important items at the beginning of memory. 
Consequently, we must ensure against wrap around and the consequent 
alteration of important CP/M information. 

We will reset the pointer to the beginning of the buffer and ring the con¬ 
sole bell if wrap around is imminent. This action protects the CP/M 
system. Of course, the information initially placed into the cache is then 
lost, but this is not likely to be a problem. You will find that a 4K-byte 
buffer will be sufficiently large for most purposes. 

At the end of the task, we can use the system debugger to move the in¬ 
formation from the memory cache down to the TP A at 100 hex. We then 
return to CP/M with control-C and save the information in a disk file. In 
Chapter 7 we will write a program that can automatically write a disk file 
directly from the memory cache. This program uses the buffer pointers to 
determine the file size. 

We need two separate sets of instructions to implement the memory 
cache. One portion initializes the pointers and sets the end-of-file marker. 
These instructions are placed in the warm-start and cold-start areas of 
BIOS or USER. Instructions for the second part place each byte into the 
memory cache and increment the main pointer. This portion is located 
with the list-output routines. We begin with the routines that initialize the 
pointers. 


Initializing the Memory Cache Pointers 

In this section we alter the warm-start and cold-start areas of BIOS or 
USER to insert the instructions for initializing the cache pointers and 
adding the end-of-file marker. We first define four symbols—the names 
of the two pointers, the name of the buffer, and the end-of-file reference. 
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Place the following four lines near the top of the source program: 


MPOINT 

EQU 

OFOOOH 

;pointer to beginning 

MAAAX 

EQU 

MPOINT+ 2 

/pointer to end 

MBUFF 

EQU 

MMAX+ 2 

/buffer start 

EOF 

EQU 

1AH 

;end-of-file mark 


Locate the warm start vector of your BIOS or USER. Remember, this 
can be found from the second jump vector. Follow the warm-start in¬ 
structions until the final return statement is encountered. Place the 
instructions shown in Figure 3.9 just before this return statement. 

Let us see how this segment works. We begin by checking whether the 
logical list output is being directed to the memory cache option. This in¬ 
formation is coded into the two high-order bits of the IOBYTE. The first 
new instruction copies the value of the IOBYTE into the accumulator: 

LDA IOBYTE 

All but the two high-order bits are zeroed with the instruction 
ANI OCOH 

If the result is not CO hex, then we complete the warm start with a return 
instruction. 

On the other hand, if the result is CO hex, the cache option has been 
selected. The HL and DE registers are then saved with PUSH instruc¬ 
tions. Then we determine if the pointer is already reset to the beginning of 
the buffer. If so, the task is complete. The HL and DE registers are 
restored by POP instructions and a return is executed. 

If the pointer has not been reset, it points to the buffer end. An end-of- 
file marker (1A hex) is placed at this point. The address of the buffer end is 
saved in the second pointer (MMAX) and the main pointer (MPOINT) is 
reset to the beginning of the buffer. The registers are restored and a return 
is executed. 

It will also be necessary to initialize the buffer pointer during the cold 
start, so we must locate the cold-start entry. It is referenced by the first 
vector at the beginning of the BIOS or USER. In an earlier section of this 
chapter, we added two instructions to initialize the IOBYTE during a cold 
start. Place the following two instructions immediately after these. 

COLD: 


LXI H,MBUFF 
SHLD MPOINT 

Now we will incorporate the remainder of the cache instructions. 
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WARM: 

LDA 

IOBYTE 



ANI 

0C0H 

;mask for list 


CPI 

0C0H 

; memory? 


RNZ 


;no, leave alone 


PUSH 

H 

;save registers 


PUSH 

D 



LXI 

D,MBUFF 

;buffer start 


LHLD 

MPOINT 

;pointer 


MOV 

A,L 

;check low 


CMP 

E 

;pointers reset? 


JNZ 

MEM3 

;no 


MOV 

A,H 

;check high 


CMP 

D 

;reset? 


JZ 

MEM4 

CD 

CO 

MEM3: 

MVI 

M,EOF 

;reset pointers 
;end of file mark 


SHLD 

MMAX 

;save last address 


LXI 

H,MBUFF 

;buffer start 


SHLD 

MPOINT 

;save pointer 

MEM4: 

POP 

D 

; restore 


POP 

H 



RET 


;original 


Figure 3.9: Setting up the Memory Pointers 


Instructions for Storing List Output in Memory 

Now that we have added the instructions for initializing the memory 
pointers, we can incorporate the code for actually storing the data in 
memory. The new instructions, shown in Figure 3.10, are placed between 
the RZ and RET instructions in the list-output region shown in Figure 3.8. 

This section has two parts. The first part stores each byte in memory 
and advances the memory pointer. The second part checks for wrap 
around. We begin by saving the contents of the HL register with a PUSH 
instruction. The main pointer is retrieved and used to deposit the byte in 
memory. The pointer is incremented and then checked to ensure that it is 
not wrapping around zero. 

If wraparound did not occur, the pointer is updated and a return is 
executed. On the other hand, if the pointer has a value of 0, it is reset to 
the beginning of the buffer and the console bell sounds. 
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;send list output to a 

memory cache 


PUSH 

H 

;save 

LHLD 

MPOINT 

; pointer 

MOV 

M,C 

;put byte in memory 

1 NX 

H 

;increment pointer 

MOV 

A,H 

;see if 

ORA 

L 

/passing zero 

JNZ 

MEM2 

;ok to continue 

;buffer is wrapping around zero; reset it 

;and sound console bell as a warning 

/ 

PUSH 

D 


MVI 

C,BEL 


CALL 

CON02 

;ring bell 

POP 

D 


LXI 

H.MBUFF 

;start 

MEM2: 


;update pointer 

SHLD 

MPOINTER 

;save it 

POP 

RET 

H 



Figure 3.10: Storing List Output in Memory 


Incorporate the remainder of the instructions for the memory cache into 
the BIOS. Assemble the new version and test it. Load the program into 
place with the debugger. 

It is extremely important that the main pointer is correctly set before 
you use the cache. Otherwise, CP/M will deposit bytes in the wrong place 
with unpredictable results. The two instructions we added to the cold- 
start section will initialize the main pointer each time you start up CP/M. 
However, we want to test the routines before they are written to the 
system tracks of the disk. Therefore, for this one time, we will have to 
initialize the main pointer. 

Use the debugger S command to set the main pointer to F004 hex. The 
instructions are as follows: 

SFOOO (you type this line) 

FOOO XX 4 (you type 4) 

F001 XX FO (you type FO) 

F002 XX . (you type a period) 
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Set the IOBYTE to a value of CO hex, again using the S command: 

S3 (you type this line) 

0003 X CO (you type CO) 

0004 X. (you type a period) 

Perform a warm start by typing control-C. You are now at the CP/M 
system level. Engage the list output by typing control-P, then give the 
command DIR. No output should appear at the printer, because we are 
diverting list output to the memory cache. Perform another warm start by 
typing control-C. This disengages the list output and resets the pointers. 

Load the debugger and inspect the beginning of the buffer with the D 
command: 

DF000,F03F 

The ASCII representation of the previous DIR output should appear on 
the right side of the screen. Look at the second pointer stored at F002 and 
F003. This pointer references the end of the text. The corresponding 
memory location should contain a 1A hex end-of-file mark. 

You can now use the debugger M command to move the information in 
the cache down to 100 hex. Perform a warm start and save the informa¬ 
tion on a disk file. You should now use SAVEUSER or SYSGEN to write 
the current version of BIOS or USER to the system tracks of a floppy 
diskette. Turn the computer off and on again; perform a cold boot with 
the new version. Use the debugger to check the main cache pointer, to be 
sure that it is properly initialized. 

An assembly listing of a set of USER routines is shown in Figure 3.11. 
This listing incorporates all the features described in this chapter. It 
operates on a Lifeboat version 2.2 CP/M running on a 56K-byte North 
Star system. Several key features will have to be changed if it is to be used 
on other systems. 


TITLE 'Sample BIOS/USER program' 

/ 

;(Current date) 

/ 

DA00 ORG 0DA00H 

0003 = IOBYTE EQU 3 


Figure 3.11: USER Routines for a 56K-Byte Lifeboat Version 2.2 
CP/M for North Star 
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0003 = CSTATP 

EQU 

3 

/console status 

0002 = CDATAP 

EQU 

CSTATP-1 

/console data 

0001 = COMSK 

EQU 

1 

/console-output mask 

0002 = CIMSK 

EQU 

2 

/console-input mask 

0005 = LSTATP 

EQU 

5 

/list status 

0004 = LDATAP 

EQU 

LSTATP-1 

/list data 

0001 = LMSK 

EQU 

1 

/list-output mask 

0080 = DTRMSK 

EQU 

80H 

/list-ready mask 

F000 = M POINT 

EQU 

0F000H 

/pointer to beginning 

F002 = MAAAX 

EQU 

AAPOINT+2 

/pointer to end 

F004 = MBUFF 

EQU 

MAAAX 4-2 

/buffer start 

/ 

000D = CR 

EQU 

13 

/carriage return 

000A = LF 

EQU 

10 

/line feed 

0007 = BEL 

EQU 

7 

/ASCII bell 

001A = EOF 

EQU 

1AH 

;end-of-file mark 

/ 

START: 




DAOO C399DA 

JMP 

COLD 

/initial cold start 

DA03 C3A5DA 

JMP 

WARM 

/warm-start reset 

DA06 C3CDDA 

JAAP 

CSTAT 

/console status 

DA09 C3D5DA 

JMP 

CON IN 

/console input 

DAOC C318DA 

JMP 

CONOUT 

/console output 

DAOF C32BDA 

JMP 

LIST 

/printer output 

DA12 C3E0DA 

JMP 

PUNCH 

/punch output 

DA15 C3E1DA 

JMP 

READER 

/alternate input device 

CONOUT: 



/console output 

DA 18 3A0300 

LDA 

IOBYTE 

/get the value 

DA1BE601 

ANI 

1 

/mask for bit 0 

DAI D C455DA 

CNZ 

LISTT 

/printer output 

C0N02: 



/regular console output 

DA20 DB03 

IN 

CSTATP 

/read status 

DA22 E601 

ANI 

COMSK 

/mask for output 

DA24 CA20DA 

JZ 

C0N02 

/loop until ready 

DA27 79 

MOV 

A,C 

/get byte 

DA28 D302 

OUT 

CDATAP 

/send 

DA2A C9 

/ 

RET 




Figure 3.11 (continued) 
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LIST: 



;logical list output 

DA2B 3A0300 

LDA 

IOBYTE 


DA2E E6C0 

ANI 

OCOH 

;mask for bits 6,7 

DA30 CA55DA 

JZ 

LISTT 

;printer output 

DA33 FE40 

CPI 

40H 


DA35 CA20DA 

JZ 

C0N02 

;console output 

DA38 FE80 

CPI 

80H 


DA3A C8 

RZ 


;bit bucket 

/ 

;send list output 

to a memory cache 


/ 

DA3B E5 

PUSH 

H 

;save 

DA3C 2A00F0 

LHLD 

MPOINT 

;pointer 

DA3F 71 

MOV 

M,C 

;put byte in memory 

DA40 23 

INX 

H 

increment pointer 

DA41 7C 

MOV 

A,H 

;see if 

DA42 B5 

ORA 

L 

;passing zero 

DA43 C250DA 

JNZ 

MEM2 

;ok to continue 

/ 

;buffer is wrapping around zero; reset it 

;and sound console bell as a warning 


DA46 D5 

PUSH 

D 


DA47 0E07 

MVI 

C,BEL 


DA49 CD20DA 

CALL 

C0N02 

;ring bell 

DA4C D1 

POP 

D 


DA4D 2104F0 

LXI 

H,MBUFF 

;start 

MEM2: 



;update pointer 

DA50 2200F0 

SHLD 

MPOINT 

;save it 

DA53 El 

POP 

H 


DA54 C9 

RET 



LISTT: 



;physical printer output 

DA55 DB05 

IN 

LSTATP 

;check status 

DA57 E680 

ANI 

DTRMSK 

;printer on? 

DA59 C28EDA 

JNZ 

LIST2 

;yes 

DA5C E5 

PUSH 

H 

;printer off 

DA5D C5 

PUSH 

B 


DA5E 2171 DA 

LXI 

H,MESG 

location 


Figure 3.11 (continued) 
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DA61 0616 

MVI 

B,AROUND-MESG 

;length 

HOOP: 




DA63 4E 

MOV 

C,M 


DA64 CD20DA 

CALL 

CON02 

;send to console 

DA67 23 

INX 

H 

/pointer 

DA68 05 

DCR 

B 

/count 

DA69 C263DA 

JNZ 

LLOOP 

/keep going 

DA6C Cl 

POP 

B 


DA6D El 

POP 

H 


DA6E C387DA 

JMP 

AROUND 

/the message 

MESG: 



DA71 070D0A 

DB 

bel,cr,lf 


DA74 205455 

DB 

' TURN PRINTER ON ',CR,LF 

AROUND: 



LIST3: 




DA87 DB05 

IN 

LSTATP 


DA89 E680 

ANI 

DTRMSK 

/printer on? 

DA8B CA87DA 

JZ 

LIST3 

/no 

LIST2: 




DA8E DB05 

IN 

LSTATP 

/check status 

DA90 E601 

ANI 

LMSK 

/mask for output 

DA92 CA55DA 

JZ 

LISTT 

/loop until ready 

DA95 79 

MOV 

A,C 

DA96 D304 

OUT 

LDATAP 

/send 

DA98 C9 

RET 



/ 

COLD: 



/cold-start entry 

DA99 3E00 

MVI 

A,0 

DA9B 320300 

STA 

IOBYTE 

/reset 

DA9E 2104F0 

LXI 

H,MBUFF 

DAA1 2200F0 

SHLD 

MPOINT 

/reset 

DAA4C9 

RET 


WARM: 



/warm-start entry 

DAA5 3A0300 

LDA 

IOBYTE 

DAA8 E6C0 

ANI 

0C0H 

/mask for list 

DAAA FEC0 

CPI 

0C0H 

/memory? 

DAACC0 

RNZ 


/no, leave alone 

DAADE5 

PUSH 

H 

/save registers 


Figure 3.11 (continued) 
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DAAE D5 

PUSH 

D 


DAAF 1104F0 

LXI 

D,MBUFF 

;buffer start 

DAB2 2A00F0 

LHLD 

MPOINT 

;pointer 

DAB5 7D 

MOV 

A,L 

;check low 

DAB6 BB 

CMP 

E 

;pointers reset? 

DAB7 C2BFDA 

JNZ 

MEM3 

;no 

DABA 7C 

MOV 

A,H 

;check high 

DABB BA 

CMP 

D 

;reset? 

DABC CACADA 

JZ 

MEM4 

co 

CD 

> 

MEM3: 



;reset pointers 

DABF361A 

MV1 

M,EOF 

;mark end of buffer 

DAC1 2202F0 

SHLD 

AAMAX 

;save last address 

DAC4 2104F0 

LXI 

H,MBUFF 

;buffer start 

DAC7 2200F0 

SHLD 

MPOINT 

;save pointer 

ME M4: 




DACA D1 

POP 

D 

;restore 

DACB El 

POP 

H 


DACC C9 

RET 


;original ret. 

/ 

;necessary routines not discussed in text 

CSTAT: 



;console input status 

DACD DB03 

IN 

CSTATP 

;read status 

DACF E602 

ANI 

OMSK 

;mask for input 

DAD1 C8 

RZ 


;not ready 

DAD2 3EFF 

MVI 

A,OFFH 


DAD4 C9 

RET 


;ready 

CONIN: 




DAD5 CDCDDA 

CALL 

CSTAT 


DAD8 CAD5DA 

JZ 

CONIN 

;not ready 

DADB DB02 

IN 

CDATAP 

;get byte 

DADD E67F 

ANI 

7FH 

;mask parity 

DADF C9 

RET 



PUNCH: 




DAEO C9 

RET 



READER: 




DAE1 C9 

RET 



/ 

DAE2 

END 




Figure 3.11 (continued) 
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SUMMARY 

In this chapter, we have explored the CP/M BIOS and USER routines 
in greater detail. We have developed and implemented several useful 
features to increase the power of our CP/M operating system, including 
routines to engage and disengage the printer, a printer-ready routine, and 
a routine to direct the list output to a memory cache. In addition to these, 
you may consider incorporating other features such as sending logical 
punch output to a telephone modem or taking console input from the 
printer keyboard. These will be left as exercises. 

































































































INTRODUCTION 

In this chapter we will introduce the concept of macro instructions, also 
called macros. We will develop several powerful macros that will be used 
in the remainder of this book. We begin with housekeeping macros that 
incorporate the version number and save and restore the stack pointer. We 
will then write macros that move information, fill memory with a constant, 
compare information, convert lowercase letters to uppercase, perform 
16-bit subtraction, and convert an ambiguous file name to an unam¬ 
biguous name. 


MACROS 

A macro instruction, or macro, is an assembler directive that defines a 
collection of other commands, instructions, or macros. A macro actually 
consists of two parts—the definition and one or more implementations or 
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expansions. The name of the macro is associated with the set of instructions 
it defines. Whenever the macro name appears in a computer program, the 
macro assembler substitutes the corresponding instructions. This is called 
the macro expansion. For example, the following sequence of instruc¬ 
tions can be defined by a macro named SAVE: 

PUSH H 

PUSH D 

PUSH B 

PUSH PSW 

Then, whenever the name SAVE appears in the computer program, the 
corresponding four instructions will be substituted. A complementary 
macro named UNSAVE can perform the inverse operations: 

POP PSW 

POP B 

POP D 

POP H 

The macro definition is placed near the top of the program or in a 
separate disk file called a macro library. The first line of the macro defines 
the macro name. The middle portion, which contains the instructions, is 
usually called the macro body. The last line terminates the macro with the 
statement ENDM. You must always remember to include the ENDM 
statement at the conclusion of the macro definition. If ENDM is omitted, 
the remainder of the program is incorrectly interpreted as part of a very 
large macro. Most macro assemblers are confused by this omission and 
issue cryptic error statements. 

Macro definitions for the above examples would look like this: 

SAVE AAACRO 

PUSH H 

PUSH D 

PUSH B 

PUSH PSW 

ENDM 

UNSAVE AAACRO 

POP PSW 

POP B 

POP D 

POP H 

ENDM 
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Macro Parameters 

Macros become more versatile with the addition of parameters. For ex¬ 
ample, suppose we want to interchange the contents of the H and L 
registers using the accumulator as a working register. A macro to perform 
this task might appear as follows: 

INTER AAACRO 

PUSH PSW 
MOV A,H 
MOV H,L 
MOV L,A 

POP PSW 

ENDM 

Now whenever the macro name INTER appears in the program, the 
assembler substitutes the corresponding five instructions: 

PUSH PSW 

MOV A,H 

MOV H,L 

MOV L,A 

POP PSW 


Notice that this macro will always generate instructions to interchange 
the H and L registers. However, if we change the macro slightly by adding 
two parameters, the macro becomes more versatile. For example, the 
following macro is similar to INTER except that the dummy parameters* 
REG1 ? and REG2? are given on the first line. (The question marks in the 
parameters are considered to be regular characters.) 


INTER2 


MACRO 

REG1?,REG2? 

PUSH 

PSW 

MOV 

A,REG1? 

MOV 

REG1?,REG2? 

MOV 

REG2?,A 

POP 

PSW 

ENDM 



The assembler substitutes the actual parameters for the dummy 


•Dummy parameters are sometimes called formal parameters. However, there appears to be 
some confusion in this usage, as the actual parameters are also sometimes referred to as formal 
parameters. 
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parameters. For example, the statement 
INTER2 H,L 

is assembled into the same five statements we got with the previous macro. 
However, the expression 

INTER2 D,E 

will generate the following instructions: 


PUSH 

PSW 

MOV 

A,D 

MOV 

D,E 

MOV 

E,A 

POP 

PSW 


Macros and Conditional Assembly 

Conditional assembly statements further increase the power of macros. 
For example, the following pair of statements can be used to test for the 
presence of an optional parameter corresponding to the dummy 
parameter PARAM?: 

IF NUL PARAM? 

ENDIF 

The expression NUL PARAM? is true if a parameter is not provided; it is 
false otherwise. Of course, the complementary expression 

IF NOT NUL PARAM? 

can be used to reverse the sense of the expression; that is, the expression is 
true if a parameter is provided. 

The Microsoft assembler also accepts the alternate forms 

IFDEF PARAM? 

ENDIF 

and 

IFNDEF PARAM? 

ENDIF 
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for IF NOT NUL and IF NUL. The expressions IFDEF and IFNDEF 
respectively mean “if defined” and “if not defined.” 

For some programs we will want to execute a return statement when we 
are finished. On other occasions, however, we will branch to a specific 
address. For example, consider the following fragments of macro EXIT 
which we will develop shortly: 


MACRO 

WHERE? 

IF 

NUL WHERE? 

RET 


ELSE 


JMP 

WHERE? 

ENDIF 


ENDM 



Parameter WHERE? is optional in this example. Suppose that macro 
EXIT is used without this parameter: 

EXIT 

A simple return statement will be created in this case, because the expression 
NUL WHERE? is true. However, if a parameter is included, then a 
branch to the parameter is generated. Thus the macro reference 

EXIT BOOT 

will generate the instruction 

JMP BOOT 

Before we begin our macro library, let us first consider the generation 
of Z80 inductions by using macros and an 8080 macro assembler. 


GENERATING Z80 INSTRUCTIONS 
WITH AN 8080 ASSEMBLER 

The Z80 CPU can execute all of the 8080 instructions; consequently, an 
8080 assembler is commonly used for generating assembly language pro¬ 
grams to run on a Z80 computer. The Digital Research macro assembler, 
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called MAC, uses the Intel 8080 mnemonic instructions. The Microsoft 
macro assembler, MACRO-80, can assemble either the Intel 8080 or the 
Zilog Z80 mnemonics. Throughout this book we will use primarily the 
8080 mnemonics. Consequently, either of these macro assemblers will be 

suitable. . . . 

However, there are several powerful Z80 instructions that are 

sometimes useful when writing assembly language programs. An 8080 
assembler can generate these instructions with macros. In fact, the Digital 
Research macro assembler is supplied with a set of macros for this purpose. 

For example, suppose that we must subtract one number from another. 
This operation can be performed by taking the two’s complement of the 
first number and then adding the result to the second number. There is a 
Z80 instruction that can perform this operation; the mnemonic is NEG. 

The 8080 instruction set does not explicitly incorporate this operation, 
but it can be performed by combining two 8080 instructions. The two’s 
complement can be obtained by incrementing the one’s complement. 
Because there is an 8080 mnemonic for performing a one’s complement 
and another for incrementing the result, we can combine these two opera¬ 
tions into a macro. The macro definition is as follows: 

NEG MACRO ;two's complement 

CMA ;;one's complement 

INR A 

ENDM 

Whenever the two’s complement is needed, the macro 
NEG 

is placed into the source program. The 8080 assembler will substitute the 
corresponding instructions: 

CMA 
INR A 

Notice that the comment in the first statement begins with two 
semicolons rather than the usual one: 

CAAA ;;one's complement 

This has a special meaning in macro definitions. When a comment begin¬ 
ning with a single semicolon appears in a macro definition, the comment is 
reproduced at each expansion of the macro. However, if a comment 
begins with a double semicolon, it is not written at each expansion. 
Because the first and last lines of the macro are not reproduced at each 
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expansion, the comments on these lines can be written with one semicolon. 

Again, notice how the above macro becomes more versatile with the 
addition of a parameter. Suppose that we change the definition of the 
previous macro to look like this: 


MACRO 

REG? 

;two's complement 

IF 

NOT NUL REG? 


PUSH 

PSW 

;;save A 

MOV 

ENDIF 

A, REG? 

;;get register 

CMA 


;;one's complement 

INR 

A 


IF 

NOT NUL REG? 


MOV 

REG?,A 

;;return value 

POP 

ENDIF 

ENDM 

PSW 

;;restore A 


The macro reference NEG will generate the same two instructions as the 
previous version did, because no parameter was included in the macro 
reference. However, if a parameter is included in the expression, the result 
is different. For example, the expression 

NEG C 

contains the parameter C. This time the resulting assembly code will be as 
follows: 


PUSH 

PSW 

MOV 

A,C 

CAAA 


INR 

A 

MOV 

C,A 

POP 

PSW 


That is, the single macro statement NEG C produces six lines of instruc¬ 
tions rather than two. During the macro expansion, the dummy parameter 
REG? is replaced with the parameter C. The conditional passage 

IF NOT NUL REG? 

ENDIF 

will generate instructions only if a parameter is included in the calling 
statement. Otherwise, the section between IF and ENDIF will be omitted. 
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THE 8080/Z80 SWITCH 

Even though the Z80 computer is very popular, there are many 8080 
and 8085 computers in use. There is also a combination CPU card that 
contains both an 8085 and an 8088 CPU. (The 8085 CPU can execute all 
of the 8080 instructions but none of the Z80 instructions that are not com¬ 
mon to the 8080.) Consequently, it may be necessary to use 8080 code on 
one occasion, while the more efficient Z80 code can be used at other times. 
This is easily accomplished with macros and conditional statements. 

A Z80 flag can be defined at the beginning of the program. For example, 
the statement 

Z80M EQU TRUE ;Z80 mode flag 

is used to indicate that Z80 code is desired. Otherwise, the statement 

Z80M EQU FALSE ;Z80 mode flag 

is used. (Of course, the symbols TRUE and FALSE must be defined 
separately.) The macro will generate either Z80 or 8080 code, depending 
on the definition of the Z80M flag. 

As an example, let us consider the unconditional relative jump. 
Sometimes we need to transfer control (branch) to a different portion of a 
program. In this case we use an unconditional jump instruction. With the 
Z80 we have a choice of either a relative unconditional branch to a location 
a certain distance away from the present position or an absolute uncondi¬ 
tional branch to a fixed address. The relative jump is usually preferred 
because the instruction is shorter than the absolute jump. However, the 
8080 CPU cannot perform the relative jump. Thus we might wish to use 
the relative jump with a Z80 but an absolute jump with an 8080. 

We can write a dual macro using conditional assembly statements so 
that we can generate the Z80-compatible instruction for one application 
and the 8080-compatible instruction on other occasions. For example, we 
can define a relative jump macro as follows: 


MACRO 

ADDR? 

IF 

Z80M 

DB 

18H, ADDR? -$-1 

ELSE 


JMP 

ADDR? 

ENDIF 


ENDM 



If the Z80 flag is true, then the macro reference 
JR DONE 






BEGINNING A MACRO LIBRARY 79 


will generate the two bytes corresponding to the desired Z80 code: 

DB 18H, DONE -$ -1 
Otherwise, the three-byte 8080 instruction 

JMP DONE 
will be generated. 

As another example, consider the Z80 mnemonic DJNZ. This instruc¬ 
tion decrements the B register, then jumps relative to the operand if the 
zero flag is reset.* The dual macro might look like this: 

DJNZ MACRO ADDR? 


IF 

DB 

ELSE 

DCR 

JNZ 

ENDIF 

ENDM 


Z80M 

10H, ADDR? -$-l 


B 

ADDR? 


The Z80 version of the macro reference 
DJNZ LOOP 
will assemble into 

DB 10H, LOOP -$ -1 

for the corresponding Z80 instruction. On the other hand, the 8080 mode 
produces the lines 

DCR B 
JNZ LOOP 

The resulting assembled code is fixed. It will perform the same way each 
time it is executed. This is a very different concept from a Pascal or 
BASIC expression such as 

IF A = B THEN . . . 

With this BASIC statement, one set of instructions might be executed if 
the statement is true. However, another set could be executed if the statement 
is false. 

Before beginning the macro library, let us briefly summarize the concept 


♦Remember that a flag is reset ox false when zero and set or true otherwise. 
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of macros. A macro assembler will analyze the source program by reading 
it several times. Each reading is called a pass. On one pass, the part of the 
assembler that processes the macros converts the macro references into 
the desired instructions. For example, we saw that the macro NEG 
generates the following two instructions: 

CAAA 

INR A 

On the next pass, the assembler analyzes the instructions created by the 
macro processor as though the instructions had been included in the 
original source program. The resulting binary code will be the same 
whether or not macros were used. 


STARTING THE MACRO LIBRARY 

In this chapter and those that follow we are going to create a disk file of 
useful macros. This macro “library” will be used in many of the programs 
we will develop. If we place a copy of each macro in each program, there 
will be much duplication. Therefore, we will find it more convenient to 
place all the macros in a separate macro library. We can then simply refer 
to them from each program. 

Another advantage of the macro library is that it can greatly simplify 
program revision. Suppose you have to change a macro that is used in 
many different programs. If the macro were coded into each program, 
you would have to change each occurrence. However, if the macro appears 
only once in the macro library, only that one copy has to be changed. 

Let us begin our macro library with a heading and some useful symbols. 


Commonly Used Constants 

There are several values we will need in almost all our programs. These 
include the characters such as carriage return, line feed, and blank. It will 
be more convenient to refer to these values symbolically rather than 
through the corresponding decimal or hexadecimal value. We could 
give a set of symbolic constants at the beginning of each program, but it 
will be more convenient to place the definitions in the macro library. If 
you are using the Digital Research assembler, use your system editor to 
create a disk file with the name 


CPMAAAC.LIB 
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If you are using the Microsoft assembler, name the file 
CPMMAC.MAC 

We will add each new macro to this disk file. Each assembly language pro¬ 
gram that references this file will contain the following statement near the 
beginning: 


MACLIB CPMMAC 

The MACLIB statement instructs the macro assembler to search the disk 
file named CPMMAC for the required macro definitions. 

a cAAf CC that thC Digital Research assembler requires an extension of 
ASM for the assembly language program and an extension of LIB for the 
macro library. On the other hand, the Microsoft assembler expects an ex¬ 
tension of MAC for both. 

Enter the information given in Figure 4.1 into the disk file 
CPMMAC.LIB (or CPMMAC.MAC if you use the Microsoft 
assembler). Notice that the library begins with a brief description on the 
first line, and the current date is placed on the second line. Change this 
date whenever alterations are made to the file. The third item in the library 
is a directory listing of the macros defined in the file. Of course, there are 
no macros at this time. However, this library will contain about 40 macros 
by the time we have completed this book, so we should document the con¬ 
tents carefully. The symbolic constants are added next. 

We will now place our first macro in the library. This macro will code 
the version number into each program we write. 


A Macro to Code the Version Number 

In Figure 3.11 we placed a creation date near the beginning of the 
source program so we could distinguish the new version from previous 
versions. However, this date is not actually coded into the binary form of 
the program. After a program is assembled into binary code, it is difficult 
to determine exactly when it was created. If there are two programs with 
similar names, it may not be possible to choose the more recent version. 
For this reason we will code a version number into each program we write 
from now on. We will write the information in ASCII so that it will be easy 
to decipher. To make matters simple, we will code the date and the program 
name. Then we can easily identify the name of the program and the most 
recent date. To accomplish this we will use an inline macro called VERSN 
The lines of a computer program are normally executed in sequence’ 
one after the other. Therefore, one programming technique is to place the 
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main part of the program at the beginning and the subroutines at the end. 
For example: 

AAAIN: 



CALL 

SUB1 


CALL 

SUB2 

SUB1: 

RET 


SUB2: 

RET 



With this method, the main program with its subroutine calls can be written 
first. The subroutines then follow the main program. 

An alternate technique is to place the subroutines directly in the path ot 
the main program. In this case we must use a branch to get around the 
obstruction. For example: 

AAAIN: 

CALL 
JAAP 

SUB1: 


SUB1 

AROUND 


RET 


AROUND: 


SUB2: 


CALL 

JAAP 


SUB2 

OVER 


OVER: 


RET 


While this approach appears to be less organized than the previous 
method, it has an important advantage-the subroutine is written into the 
main program (inline) where it is needed. Furthermore, this method can 
be implemented easily with macros. Within this book we shall refer to a 

macro of this type as an inline macro. 

Our first macro, shown in Figure 4.2, is called VERSN (for version 
number). This inline macro is placed near the beginning of the program. 
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,;Macro library for CP/M system routines 
;;(Put current date here) 

// 

;;Macros in this library: 

;;(List each macro name at this point) 


EOF 

EQU 

1AH 

;end of file 

ESC 

EQU 

1BH 

; escape 

CR 

EQU 

13 

/carriage return 

LF 

EQU 

10 

/line feed 

TAB 

EQU 

9 

/control-1 

BLANK 

EQU 

32 

/space 

PERIOD 

EQU 

46 

/decimal point 

COMMA EQU 44 
;;(place macros here) 


Figure 4.1: The Beginning of a Macro Library: Frequently Used Symbols 


VERSN MACRO NUM 
;;(Put current date here) 

;;lnline macro to embed version number. 
;;NUM is enclosed in quotes. 


// 


// 

;;Usage: 

VERSN 

'XX. XX. XX. NAME' 


LOCAL 

AROUND 


JMP 

AROUND 


DB 

'Ver ',NUM 

AROUND: 

ENDM 

;;VERSN 


Figure 4.2: Macro VERSN to Code the Version Number 
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The macro reference 

VERSN '9.23.82. FIRST' 

will generate three statements: 

JMP ??0001 
DB 'Ver ','9.23.82.FIRST' 

?? 0001 : 

This macro can be used to embed information, such as the date and 
program name, directly into the binary code. The data statement Ver 
9 23 82 FIRST” is embedded in the program and a jump instruction is used 
to get around the expression. The label AROUND is declared to be a local 
variable in the macro definition. This means that it has meaning only 
within the macro definition. The Digital Research assembler assigns the 
symbol ??0001 to the first use of a local variable (AROUND in this 
case). Other macro assemblers may use a different symbol. 

If this macro is used more than once in the same program, a different 
label will be generated each time. Thus the word AROUND does not actually 
appear in the assembly listing. The label AROUND can be used elsewhere 
in the program, or as a variable in another macro, without producing a 
duplicate-name error. Notice that the symbol NUM is a dummy param¬ 
eter. It too can be used outside the macro without producing a conflict. 

The second statement generated by macro VERSN defines the data to 
be embedded in the program. (The assembler directive DB stands for 
“define byte.”) The operand in this example consists of a string ot 
alphanumeric characters enclosed in apostrophes. However, byte-sized 
symbols can also be used. The third statement generated by macro 
VERSN is the label ??0001, which is the target of the jump instruction. 

Now create another file called TESTVER. ASM. We will use this program 
to test our first macro. Type in the information shown in Figure 4.3. 
Notice that this program references our macro library. Put today’s date at 
the beginning of the program and also in the parameter to macro VERSN. 

If you are using the Microsoft assembler, you have to make a few 
changes. First, remove the apostrophes enclosing the title on the first line. 
Second, be sure that the MACLIB statement is written in uppercase 
letters * Third, remove the ORG statement. Fourth, place a .XLIST state¬ 
ment just before the MACLIB statement and a .LIST afterward. This 


•Uppercase letters are not necessary in the Digital Research version but they are shown 
here to clearly differentiate program lines from comment lines. To highlight the m 
references, we set them in boldface type in this book. 
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TITLE 

'TESTVER to test macro VERSN' 

/ 

;Mar. 3, 

82 


BOOT 

TPA 

EQU 

EQU 

0 ;warm boot 

100H ,'where programs go 

ORG 

AAACLIB 

TPA 

CPMAAAC 

;omit for Microsoft version 

START: 

VERSN 

JMP 

'3.3.82. FIRST' 

BOOT 

/ 

END 

START 


Figure 4.3: Program to Test Macro VERSN 


tells the Microsoft assembler not to print out the macro library. 

Assemble the program and compare your assembly listing to the one 
given in Figure 4.4. (Assemblers consider lowercase and uppercase letters 
to be equivalent. However, if you use lowercase letters, the Digital 
Research assembler converts them to uppercase.) The first instruction 
shown in the assembly listing follows the label START. It is a jump 
around the coding of the program name and date. Notice that the first two 
lines of code contain plus symbols between the address and the corre¬ 
sponding code. This is the method Digital Research uses to indicate lines 
that are generated by macros. 

Load the assembled file into memory and examine it with the debugger 
For the Digital Research version, this is done with the command 

SID TESTVER. HEX 

Display the first part of memory with the D command: 

D100,1 IF 


The result will be as follows: 


0100: 

0110: 


C3 13 01 
52 53 54 


56 65 72 20 
C3 00 00 00 


33 2E 33 2E 38 32 2E 46 
00 00 00 00 00 00 00 00 


49 ...Ver 3.3.82.FI 
00 RST.... 
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TITLE 

'TESTVER to test macro VERSN' 


;Mar. 3, 82 


0000 = 

BOOT 

EQU 

0 ;warm boot 

0100 = 

TPA 

EQU 

100H ;where programs go 


f 

MACLIB 

CPMMAC 

0100 

ORG 

TPA 

;omit for Microsoft version 


START: 

VERSN 

'3.3.82.FIRST' 

0100+C31301 

JMP 

??0001 

0103 + 566572 

DB 

Ver ','3.3.82.FIRST' 

0113 C30000 

JMP 

BOOT 

0116 

r 

END 

START 


Figure 4.4: Assembly Listing for Figure 4.3 


There are three parts to this display. The first number on each line is the 
address (100 hex for the first line in this example.) The second part of the 
line gives the contents of 16 bytes of memory expressed in hexadecimal. 

The third part shows the ASCII representation of the same 16bytes. If the 

bytes are not printable ASCII characters, they are shown as decimal 
points. You can branch to this program with the command G100. 
However, this simple program does not actually do anything; we on y 
wrote it test the assembler operation. 

Macros to Save and Restore the Incoming Stack 

When a program is executed from the CP/M operating system, it is 
loaded from disk into the transient program area (TPA) starting at address 
100 hex CP/M then branches to 100 hex. At the conclusion of the pro- 
gram, it is possible to return to CP/M by one of two different methods. 
The simplest approach is to perform a warm start with a jump to address 

0 , as we did in Figure 4.3. . , 

Another method of returning to CP/M is to save the incoming stack 
pointer and set up a new stack for the program to use. At the conclusion of 
the program, the original stack pointer is restored and a return instruction 
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is executed. This method of termination is faster and therefore preferable 
to the previous method, because it does not reload the CCP and BDOS 

from disk. We will use this approach for most of the programs in this 
book. 

Sometimes, however, a program is so large that it destroys the CCP. In 
this case the program must terminate with a warm start. A new copy of the 
CCP and BDOS is then loaded from the system disk. 

Saving and restoring the stack pointer is easily accomplished with a Z80 
CPU. The Z80 mnemonics are as follows: 


START: 

LD 

(OLDSTK ),SP 


LD 

SP, STACK 

DONE: 

LD 

SP, (OLDSTK) 


RET 



The first two instructions are placed at the beginning of the program. 
The stack pointer is saved in a memory location called OLDSTK. The new 
stack is placed at the location defined by STACK. Two other instructions 
are placed at the end of the program. The first instruction restores the 
original stack pointer from the memory location OLDSTK The final 
instruction returns to CP/M. 

The 8080 CPU does not have instructions for directly saving and restoring 
the stack pointer. Consequently, the 8080 version is more complicated, 
he usual method is to copy the incoming stack pointer into the HL 

register pair and save this directly in memory. The instructions are as 
follows: 

START: 

LXI H,0 

DAD SP 

SHLD OLDSTK 

LXI SP,STACK 

At the conclusion of the program, the original stack pointer is loaded 
from memory into the HL register and then transferred into the stack 
pointer register. A return is then executed. The instructions look like this: 

DONE: 

LHLD OLDSTK ;orig stack 

SPHL 

RET 


;clear 

;add pointer 
;save 
;new one 
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With either the Z80 or 8080 version, we also have to allocate the storage 
place for the original stack pointer and the new stack area. Thus we in¬ 
clude the following lines: 

OLDSTK: DS 2 incoming stack 

DS 34 

STACK: 

For most of the programs in this book we will want to save the incoming 
stack pointer and restore it at the end. Consequently, it will be convenient 
to perform these operations with two macros. The macro at the beginning 
of the program will be called ENTER and the one at the end will be called 
EXIT. (We must be careful that the symbols we choose are not reserved by 
the assembler. For example, we cannot select the symbol END.) 

Add the macros shown in Figure 4.5 to the macro library (CPMMAC). 
If you place them before macro VERSN, the three macros will be in 
alphabetical order. Be sure to place the names ENTER and EXIT in the 
directory near the beginning of the macro library. 

The ENTER macro generally will be placed immediately after the label 
START; the EXIT macro is placed at the end of the program. Notice that 
macro ENTER has no parameters, but macro EXIT has two dummy pa¬ 
rameters. There are also two conditional assembly blocks within macro 
EXIT. With this arrangement, it is possible to generate many different 
sets of instructions from the same macro definition. 

If no parameters are included in the reference to macro EXIT, the two 
dummy parameters WHERE? and SPACE? will be defined as NUL. The 
conditional expressions 

IF NUL WHERE? 

and 

IF NUL SPACE? 

will be true and the first part of the conditional block, down to the ELSE 
statement, will be assembled. The instruction between the ELSE and the 
ENDIF statements will not be assembled. The resulting code will include 
a return instruction after the incoming stack pointer is restored, and 34 

bytes of stack space will be provided. 

Notice that the stack is placed at the end of the program. It might seem 
more logical to place the stack at the beginning. However, the resulting 
program will then be much larger, because the stack space must be included 
with the program. The stack need not be saved when it is placed at the end. 
Make a copy of the test program given in Figure 4.3 and alter it to look 
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ENTER 

MACRO 


;;(Put current date here) 

;;inline 

macro to save the incoming stack 


LXI 

H,0 ;clear 


DAD 

SP ;add pointer 


SHLD 

OLDSTK ;save 


LXI 

SP,STACK 



;;ENTER 


ENDM 


EXIT 

MACRO 

WHERE?,SPACE? 

'"/’Inline macro to restore the incoming stack 

;;and branch to location WHERE? 

;;lf WHERE? is omitted, execute a return instruction. 

;;SPACE? sets stack space; default is 34. 

/ / 

LHLD 

OLDSTK 


SPHL 



IF 

NUL WHERE? 


RET 



ELSE 



JMP 

WHERE? 


ENDIF 


OLDSTK: 

DS 

2 ;incoming stack 


IF 

NUL SPACE? 


DS 

34 


ELSE 



DS 

SPACE? 


ENDIF 


STACK: 

EQU 

$ ;omit EQU $ for Microsoft 



;;EXIT 


ENDM 



Stack p 5: ^ aCr0S ENTER and EXIT t0 Save md Restore the ^coming 
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TITLE 

'TESENT to test macros ENTER and EXIT' 

;Mar. 3, 82 



BOOT 

TPA 

EQU 

EQU 

0 

100H 

;warm boot 
;where programs go 

/ 

;Digital Research version 

AAACLIB CPMAAAC 


ORG 

TPA 



START: 

ENTER 

VERSN 

'3.3.82. SECOND' 


EXIT 



/ 

END 

START 



Figure 4.6: Program to Test Macros ENTER and EXIT 


like the program shown in Figure 4.6. If you are using the Microsoft 
assembler, make the same changes you made in Figure 4.3. In adchtion, 
you must remove the expression EQU $ following the label STACK in 
macro EXIT. For the Microsoft version, the end of macro EXIT looks 
like this: 


STACK: 


; ;EXIT 

ENDM 


Notice that the reference to macro EXIT has no parameters. Assemble 
the program and compare the assembly listing to Figure 4.7. This program 
can be executed, but it will not do anything. 


Using Parameters in Macro EXIT 

In the previous program, the reference to macro EXIT did not contain 
parameters. But consider the program fragment shown in Figure 4.8. In 
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TITLE 

'TESENT to test macros ENTER and EXIT' 


/ 

;Mar. 3, 

82 


0000 = 

/ 

BOOT 

EQU 

0 /warm boot 

0100 = 

TPA 

EQU 

100H /where programs go 


/Digital Research version 



AAACLIB 

CPAAAAAC 

0100 

/ 

ORG 

TPA 



START: 

ENTER 


0100 + 210000 

LXI 

H,0 ;clear 

0103 + 39 


DAD 

SP ;add pointer 

0104 + 222301 

SHLD 

OLDSTK ;save 

0107 + 314701 

LXI 

SP, STACK 



VERSN 

'3.3.82. SECOND' 

010A+C31E01 

JMP 

??0001 

010D+566572 

DB 

Ver ','3.3.82. SECOND' 



EXIT 


011E + 2A2301 

LHLD 

OLDSTK 

0121 +F9 


SPHL 


0122+C9 


RET 


0123 + 

0125 + 

OLDSTK: 

DS 

DS 

2 incoming stack 

34 

0147+ = 

STACK: 

EQU 

$ ;omit EQU $ for Microsoft 

0147 

/ 

END 

START 


Figure 4.7: Assembly Listing for Figure 4.6 


this example, the reference to macro EXIT contains two parameters: 
EXIT BOOT, 20 

During assembly, the dummy parameter WHERE? is defined as the label 
BOOT and the dummy parameter SPACE? takes on the value of 20. 
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EXIT 

BOOT, 20 

011E + 2A2501 


LHLD 

OLDSTK 

0121+F9 


SPHL 


0122 + C30000 


JMP 

BOOT 

0125 + 

OLDSTK: 

DS 

2 incoming stack 

0127 + 


DS 

20 

013B+ = 

STACK: 

EQU 

$ 


Figure 4.8: Using Parameters in Macro EXIT 


Thus the expressions 

IF NUL WHERE? 
and 

IF NUL SPACE? 

are false. The assembled code includes a jump to BOOT and provides 20 

bytes of stack space. . 

Of course, other combinations of parameters are possible. For examp e, 

the statement 

EXIT ,20 

contains only the second parameter. The comma in front of the 20 in¬ 
dicates that the first parameter is omitted and is therefore defined as 
NUL. This statement will generate a return instruction and provide 20 
bytes of stack space. 


A MACRO TO MOVE INFORMATION 

From time to time we will find it necessary to move information from 
one part of the computer’s memory to another. This is galled a block 
move. We will now write a macro to perform this task. Both the 8080 and 
the Z80 CPUs incorporate 16-bit registers that can be used as pointers 
during the move. The Z80 also contains instructions for directly performing 
block moves. The block move can be greatly simplified, therefore, if a 

program isdesigned to runonaZSO CPU. However, we will only consider 

the 8080 version at this time. 

Add the MOVE macro given in Figure 4.9 to your macro library. Place 
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MOVE 

AAACRO 

FROM, TO, BYTES 

;;(Put current date here) 

;;inline macro to move text 


// 

LOCAL 

AROUND 



PUSH 

H 



PUSH 

D 



PUSH 

B 



LXI 

H,FROM 



LXI 

D,TO 



LXI 

B, BYTES 



CALL 

MOVE2? 



POP 

B 



POP 

D 



POP 

H 



JMP 

AROUND 


f 

MOVE2?: 

MOV 

A,M 

;get It 


STAX 

D 

;put it 


INX 

H 

;from 


INX 

D 

;to 


DCX 

B 

;byte count 


MOV 

A,C 


ORA 

B 



JNZ 

MOVE2? 

;not done 


RET 



AROUND: 

ENDM 


;;MOVE 


Figure 4.9: Macro MOVE, Version 1 


it between macros EXIT and VERSN to maintain alphabetic order. Be 
sure to add the name MOVE to the directory at the beginning of the macro 
library. The MACLIB directory should now list the following macros: 

ENTER 

EXIT 

MOVE 

VERSN 
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The organization of macro MOVE is typical of many of the macros we 
will write in this book. There will be an initialization section, a subroutine 
call, a jump around the subroutine, and the subroutine itself. 

Let us examine the details of macro MOVE. There are three dummy 
parameters: FROM, TO, and BYTES. As the names imply, FROM refers 
to the address of the source block, TO refers to the destination block, and 
BYTES gives the number of bytes to be moved. The macro begins by saving 
the CPU registers with PUSH instructions. Then the HL register is loaded 
with the source address, the DE register is loaded with the destination ad¬ 
dress, and the BC register is loaded with the number of bytes to be moved. 
(Remember that the X in the mnemonic refers to the extended or double 
register. Thus, the operand H means HL, and so forth.) 

The main part of the macro calls subroutine MOVE2? to perform the 
actual move. A byte is moved from the original memory location to the 
accumulator with a MOV A,M instruction. The byte is then moved to the 
destination with a STAX D instruction. The HL and DE pointers are 
incremented and the byte count in register BC is decremented. The 
subroutine continues in this way until the byte count in register BC 
reaches zero. 

Testing a double register for zero is more complicated than testing a 
single register, because the CPU flags are not affected by double-register 
increment or decrement instructions. Thus, the instructions 


DCX B 
JZ MOVE2? 

will not work. The macro performs the test for zero by moving one half of 
the register to the accumulator and executing a logical OR with the other 
half At the conclusion of the block move, control returns to the mam part 


of the macro. . , , 

For the first expansion of macro MOVE, subroutine MOVE2. is coded 

inline, immediately after the main part of the macro. Consequently , there 
is a jump instruction to skip over this subroutine. The local label 
AROUND is used for this purpose. Notice that the name of subroutine 
MOVE2? has not been declared as a local variable; rather, it is a global 
variable. It can therefore be called from other parts of the main program. 

Create a disk file named MOVE1 .ASM and enter the program shown in 
Figure 4.10. We will use this program to test the operation of macro 

M Ouftest program begins with macro VERSN and continues with macro 
MOVE. The instructions terminate with a jump to BOOT followed by an 
arrow that points to this jump. The source string begins at the label TEXT 
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TITLE 

'TESTMOVE to test macro MOVE' 

/ 

;Dec. 16, 81 


/ 

FALSE 

EQU 

0 

TRUE 

EQU 

NOT FALSE 

/ 

BOOT 

EQU 

o ;system reboot 

BDOS 

EQU 

5 ;BDOS entry point 

TPA 

EQU 

100H transient program area 


AAACLIB 

CPMAAAC 

/ 

ORG 

TPA 


/ 

START: 


VERSN 

'12.16.81. TESTMOVE.T 


MOVE 

TEXT, NEWTEX, TEXEND-TEXT 


JMP 

BOOT 

/ 

DB 

'<= = = =' 

TEXT: 


DB 

'A test of macro MOVE' 

TEXEND: 

ORG 

400H 


/ 

NEWTEX: 

DS 

i 

/ 

END 

START 


Figure 4.10: Program to Test Version 1 of Macro MOVE 


and continues to the label TEXEND. The destination address is 
NEWTEX. 

Assemble the program and compare the assembly listing to Figure 4.11. 
Take note of the final jump instruction at address 13A hex. (The address 
in your program may be different, depending on how you coded the date.) 
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TITLE 

'TESTAAOVE1 

;Dec. 16, 81 

/ 

0000 = FALSE 

EQU 

FFFF = TRUE 

EQU 

/ 

0000 = BOOT 

EQU 

0005 = BDOS 

EQU 

0100 = TPA 

EQU 


AAACLIB 

/ 

0100 ORG 

TPA 

START: 

0100+C31A01 

VERSN 

JAAP 

0103 + 566572 

DB 

011A + E5 

AAOVE 

PUSH 

011B + D5 

PUSH 

011C+C5 

PUSH 

011D + 214201 

LXI 

0120+110004 

LXI 

0123 + 011400 

LXI 

0126+CD2F01 

CALL 

0129+C1 

POP 

012A + D1 

POP 

012B + E1 

POP 

012C + C33A01 

JAAP 

012F+7E 

AAOV 

0130+12 

STAX 

0131+23 

INX 

0132+13 

INX 

0133+0B 

DCX 

0134+79 

AAOV 

0135 +B0 

ORA 


test macro MOVE' 


0 

NOT FALSE 

0 ;system reboot 

5 ;BDOS entry point 

100H transient program area 

CPAAMAC 


'12.16.81.TESTAAOVE.1' 
??0001 

Ver'12.16.81. TESTMOVE.l' 
TEXT, NEXTEX, TEXEND-TEXT 
H 
D 
B 

H,TEXT 

D,NEWTEX 

B,TEXEND-TEXT 

AAOVE2? 

B 

D 

H 

??0002 

A,M ;get it 

D ;put it 

H ;from 

D ;to 

B ;byte count 

A,C 
B 


Figure 4.11: Assembly Listing for Figure 4.10 
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0136+C22F01 JNZ 

MOVE2? ;not done 

0139+C9 

RET 

013AC30000 

JMP 

BOOT 

013D 3C3D3D 

DB 

TEXT: 

'<= = = =' 

0142 412074 

DB 

TEXEND: 

'A test of macro MOVE' 

0400 

/ 

ORG 400H 


0400 

/ 

NEWTEX: DS 

1 

0401 

/ 

END 

START 


Figure 4.11 (continued) 


We will need this location in our next step. Load the hex file into memory 
with the debugger command 

SID MOVE 1. HEX 

Display the first part of memory with the command D100,15F. The result 
will be as follows: 


0100: C3 1A 01 56 65 72 
0110: 54 45 53 54 4D 4F 
0120: 11 00 04 01 14 00 
0130: 12 23 13 0B 79 B0 
0140: 3D 3D 41 20 74 65 
0150: 6F 20 4D 4F 56 45 


20 31 32 2E 31 36 2E 38 
56 45 2E 31 E5 D5 C5 21 
CD 2F 01 Cl D1 El C3 3A 
C2 2F 01 C9 C3 00 00 3C 
73 74 20 6F 66 20 6D 61 
00 00 00 00 00 00 00 00 


31 2E ...Ver 12.16.81. 
42 01 TESTM0VE.1...!B. 

01 7E ./. 

3D 3D .#..y../.<== 

63 72 ==A test of macr 
00 00 o MOVE. 


The text that was coded with macro VERSN (near the beginning of the 
program) is plainly visible in the ASCII representation. On the fourth 
line, the left-pointing arrow indicates the location of the final jump in¬ 
struction at 13A hex. Run the program by giving the command 

G100,13A 

This command begins execution of the program at address 100 and ter¬ 
minates it with a return to the debugger at address 13A hex. The debugger 
sets a breakpoint (an automatic return to itself) at address 13 A. It does this 
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by changing the jump instruction at 13 A hex to restart 7. The debugger 
will respond with the statement 

*013A 

indicating that it stopped execution at address 13 A. 

Give the debugger command D400,41F to display the destination 
block. The result will be as follows: 

0400: 41 20 74 65 73 74 20 6F 66 20 6D 61 63 72 6F 20 4 test of macro 
0410: 4D 4F 56 45 00 00 00 00 00 00 00 00 00 00 00 00 MOVE. 

The program has moved the text “A test of macro MOVE from the 
source block to the destination block. 

If you want to repeat this test, zero the destination memory with the 

debugger fill command: 

F400,41F,0 

Then repeat the original command G100.13A. 


Macro MOVE, Version 2 

For our second version of macro MOVE, we will introduce a technique 
that is applicable to many of the macros we will be writing in this book. 
We saw previously that our inline macros contain four parts—an initial¬ 
ization section, a subroutine call, a jump around the subroutine, and the 
subroutine itself. This arrangement is used for the first expansion of the 
macro. However, on subsequent macro expansions, only the first two 
parts of the macro are needed. The subroutine generated during the first 
expansion of the macro is referenced by the other expansions. 

We will use a special symbol to indicate whether the macro has been 
referenced more than once in a program. There are some important 
reasons for this feature. On the first reference to macro MOVE, a copy of 
subroutine MOVE2? will be generated. The second reference to macro 
MOVE will generate another copy of the MOVE2? subroutine. That is, a 
separate copy of subroutine MOVE2? will be generated for each call to 
macro MOVE. This is an unnecessary duplication of code. Furthermore, 
the label MOVE2? is a global variable. When it appears more than once, 
your assembler will report a phase error, meaning that a symbol has been 
assigned two different values. 

We need a method for generating a copy of the MOVE2? subroutine 
the first time macro MOVE is referenced in a program, but not on 
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subsequent references. There are several ways to do this, but we will 
choose the one that can be used by all assemblers. 

We will define the symbol MVFLAG to indicate whether a copy of 
subroutine MOVE2? has been generated. The symbol will have one of 
two values: true or false. This kind of symbol is called a flag. This flag is 
initially defined as FALSE by the statement 

MVFLAG SET FALSE 

The flag must be defined with a SET statement rather than the usual EQU 
statement so that it can be changed during assembly. (EQU expressions 
cannot be changed.) The ideal location for this flag is at the beginning of 
the macro library. However, the Digital Research assembler does not 
allow this construction. Consequently, we will place the flag at the beginning 
of each program that references the macro. 

Alter macro MOVE to look like the version shown in Figure 4.12. 
Notice that just before the JMP AROUND statement there is a condi¬ 
tional expression for testing the state of MVFLAG. On the first reference 
to macro MOVE, the flag will be false and the expression NOT MVFLAG 
will be true. Consequently, the next instructions down to the ENDIF 
statement will be assembled. These instructions generate a copy of 
subroutine MOVE2?. There is also a very important statement just prior 
to the ENDIF statement. This is the expression that changes the state of 
the flag: 


MVFLAG SET TRUE 

The next time macro MOVE is referenced within the same program, the 
flag will be true and the expression NOT MVFLAG will be false. There¬ 
fore, the assembler will not create another copy of the MOVE2? subrou¬ 
tine. The jump around the subroutine will not be necessary, either. 

Make a copy of the source program given in Figure 4.10 and alter it to 
look like Figure 4.13. Give the new version the name MOVE2.ASM. 

Assemble the new test program and compare the last portion of the 
listing to the one shown in Figure 4.14. Notice that the first call to macro 
MOVE, at address 11A hex, generates a copy of subroutine MOVE2? at 
address 12F hex. The JMP AROUND becomes JMP ??0002 (when the 
Digital Research assembler is used) because it is a local variable. The 
second reference to macro MOVE, at address 13A hex, does not gener¬ 
ate another copy of subroutine MOVE2?, but calls the copy generated by 
the first reference. 

Load the program into memory with the debugger command 
SID MOVE2. HEX 
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Display the program with the command D100,17F to give the following: 

0100: C3 1A 01 56 65 72 20 31 32 2E 31 36 2E 38 31 2E ...Ver 12.16.81. 

0110: 54 45 53 54 4D 4F 56 45 2E 32 E5 D5 C5 21 54 01 TESTM0VE.2...!T. 

0120: 11 00 04 01 14 00 CD 2F 01 Cl D1 El C3 3A 01 7E ./.:. 

0130: 12 23 13 0B 79 B0 C2 2F 01 C9 E5 D5 C5 21 68 01 .#..y../. !h - 

0140: 11 14 04 01 10 00 CD 2F 01 Cl Dl El C3 00 00 3C ./-...< 

0150- 3D 3D 3D 3D 41 20 74 65 73 74 20 6F 66 20 6D 61 ====A test of ma 

0160- 63 72 6F 20 4D 4F 56 45 2E 20 41 20 73 65 63 6F cro MOVE. A seco 

0170: 6E 64 20 4D 4F 56 45 2E 00 00 00 00 00 00 00 00 nd MOVE. 

As with the previous version, we can see the ASCII characters at the 
beginning of the program. The left-pointing arrow is also visible, 
although now it is pointing to the jump instruction at address 14C hex. 
Zero the destination block with the command 

F400,42F,0 

and execute the program with the statement 
G100,14C 

This sets a breakpoint at location 14C hex, the new location of the final 
instruction. The debugger responds with 

*014C 

Display the destination area with the debugger command D400.42F. 
Verify that the two separate calls to macro MOVE generated the following 
composite string: 

0400- 41 20 74 65 73 74 20 6F 66 20 6D 61 63 72 6F 20 A test of macro 

0410- 4D 4F 56 45 2E 20 41 20 73 65 63 6F 6E 64 20 4D MOVE. A second M 

0420: 4F 56 45 2E 00 00 00 00 00 00 00 00 00 00 00 00 0VE. 


move aaacro from, to, bytes 

;;(Put current date here) 

"inline macro to move text 

LOCAL AROUND 

PUSH H 

PUSH D 

PUSH B 

LXI H,FROM 


Figure 4.12: Macro MOVE, Version 2 
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LXI 

D,TO 



LXI 

B, BYTES 



CALL 

MOVE2? 



POP 

B 



POP 

D 



POP 

H 



IF 

NOT MVFLAG 



JAAP 

AROUND 


/ 

MOVE2?: 

AAOV 

A,M 

;get byte 


STAX 

D 

;new place 


INX 

H 

;from 


INX 

D 

;to 


DCX 

B 

;byte count 


AAOV 

A,C 


ORA 

B 



JNZ 

MOVE2? 

;not done 


RET 



MVFLAG 

SET 

TRUE 

;;one copy 


ENDIF 


;;not AAVFLAG 

AROUND: 

ENDAA 


;;AAOVE 


Figure 4.12 (continued) 


TITLE 'TESTAAOVE to test macro AAOVE' 

/ 

;Dec. 16, 81 

/ 

FALSE 

EQU 

0 

TRUE 

EQU 

NOT FALSE 

/ 

BOOT 

EQU 

0 ;system reboot 

BDOS 

EQU 

5 ;BDOS entry point 

TPA 

/ 

EQU 

100H /transient program area 


Figure 4.13: Program to Test Version 2 of Macro MOVE 
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MVFLAG SET 

FALSE 

;block move 


AAACLIB 

CPMAAAC 



ORG TPA 




/ 

START: 




VERSN 

'12.16.81 .TESTMOVE.2' 


MOVE 

TEXT, NEWTEX, TEXT2-TEXT 


MOVE 

TEXT2, NEWTEX+TEXT2-TEXT, TEXEND-TEXT2 


JAAP 

BOOT 



DB 

'<= = = 

_ / 


TEXT: 




DB 

'A test of macro MOVE' 


TEXT2: 




DB 

A second MOVE.' 


TEXEND: 




/ 

ORG 400H 




NEWTEX: DS 

i 



END 

START 



Figure 4.13 (continued) 


MOVE 

TEXT, NEWTEX, TEXT2-TEXT 

011A+E5 

PUSH 

H 

011B + D5 

PUSH 

D 

011C + C5 

PUSH 

B 

011D + 215401 

LXI 

H,TEXT 

0120+110004 

LXI 

D, NEWTEX 

0123+011400 

LXI 

B,TEXT2-TEXT 

0126+CD2F01 

CALL 

MOVE2? 


Figure 4.14: Partial Assembly Listing of Figure 4.13 
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0129+C1 

POP 

B 

012A + D1 

POP 

D 

012B + E1 

POP 

H 

012C + C33A01 

JAAP 

??0002 

012F+7E 

AAOV 

A,AA ;get byte 

0130+12 

STAX 

D ;new place 

0131+23 

INX 

H ;from 

0132+13 

INX 

D ;to 

0133 +OB 

DCX 

B ;byte count 

0134 + 79 

MOV 

A,C 

0135 +BO 

ORA 

B 

0136+C22F01 

JNZ 

AAOVE2? ;not done 

0139+C9 

RET 

013A + E5 

MOVE 

TEXT2, NEWTEX+ TEXT2-TEXT, TEXEND-TEXT2 

PUSH 

H 

013B + D5 

PUSH 

D 

013C+C5 

PUSH 

B 

013D + 216801 

LXI 

HJEXT2 

0140+111404 

LXI 

D, NEWTEX+ TEXT2-TEXT 

0143 + 011000 

LXI 

BJEXEND-TEXT2 

0146 + CD2F01 

CALL 

MOVE2? 

0149+C1 

POP 

B 

014A + D1 

POP 

D 

014B + E1 

POP 

H 

014C C30000 

JMP 

BOOT 

014F 3C3D3D 

DB 

'<= = = =' 

TEXT: 

0154 412074 

DB 

'A test of macro AAOVE' 

TEXT2: 

0168 2E2041 

DB 

A second MOVE.' 

TEXEND: 

/ 

0400 ORG 

400H 


/ 

0400 NEWTEX: DS 

1 

0401 

END 

START 


Figure 4.14 (continued) 
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Macro MOVE, Version 3 

Sometimes we will find it necessary to move a particular string of 
characters into a memory location. Because the string will not exist prior 
to the move, the two previous versions of the MOVE macro will not be 
suitable. Therefore, for our third version we will add a new feature. This 
version will accept a string, rather than the usual memory pointer, as the 
first parameter to the macro reference. Thus we can write 

MOVE "THIRD", FCB2+1 

if we want to write the string “THIRD” into the memory location that is 
one byte beyond the beginning of FCB2. Notice that the third parameter 
(the number of bytes) and the second comma are omitted in this example. 
The assembler will automatically calculate the length we need. We will use 
this method to signal to the macro that the first parameter is a literal 

variable rather than an address pointer. 

The literal parameter is not limited to a quoted string of characters. 
Variables and constants can also be included if the entire parameter is 
enclosed in angle brackets. For example, the expression 

MOVE <2,"FIFTH">, FCB1 

will place six bytes in memory starting at the location FCB1 (5C hex). The 
first byte is the binary number 2; the ASCII string “FIFTH” is placed im- 
mediately following it. Of course, symbols such as EOF (end of file), CR 
(carriage return), and LF (line feed) can be included as well. Notice that 
there is a comma separating the constant 2 from the string FIFT . 

Alter macro MOVE so that it looks like Figure 4.15. This third version 
of macro MOVE begins as before by saving the registers. We then en¬ 
counter a new feature. When the assembler finds the expression 


IF NOT NUL TO 

LXI D,TO 

ENDIF 


it checks to see if the second parameter, the destination addresses actually 
supplied in the macro reference. If this parameter is omitted, it is assumed 
that the program has loaded the DE register with the destination address 
prior to the macro reference. The expression IF NOT NUL TO is false. 
On the other hand, if the second parameter is provided, the expression IF 
NOT NUL TO is true. The instruction LXI D,TO is then included. 

With the previous versions, the destination address always had to be in¬ 
cluded in the macro reference as a parameter. But sometimes the destina¬ 
tion address is not known at assembly time. This new version of macro 





BEGINNING A MACRO LIBRARY 105 


MOVE allows us to obtain the destination address from a memory loca¬ 
tion or from the result of a calculation performed during execution of the 
program. Suppose, for example, that the destination address is stored at 
location DEST. The following instructions will move 20 bytes starting at 
J™? 8 FROM int0 the memory area whose address is stored at location 


PUSH 

H 

;save 

LHLD 

DEST 

;get it 

XCHG 


;into DE 

POP 

H 

/restore 

MOVE 

FROM,, 20 



The next portion of macro MOVE checks to see whether the third 
parameter, the number of bytes to move, is present. If this parameter is 
omitted, a literal move is indicated. The instructions between IF NUL 
BYTES and the ELSE statement are then included. With this version the 
assembler generates code to copy the literal first parameter into mem¬ 
ory at the location referenced by the symbol MESG. This label is located 
near the end of the macro. Note that MESG is defined as a local variable. 
Thus there can be one copy in each expansion of the macro. 

. alternate passage between ELSE and ENDIF is assembled when 
the third parameter is supplied in the macro reference. The first parameter 
can be omitted in this case as well. Thus the command 

MOVE , ,20 

will move 20 bytes from the address referenced by HL to the address 
referenced by DE. 

The macro continues with the usual call to subroutine MOVE2 9 and 
then restores the registers. The JMP AROUND instruction is embedded 
in a conditional block that checks for two things: the state of MVFLAG 
and whether the third parameter, BYTES, is present. 

IF NOT MVFLAG OR NUL BYTES 

JMP AROUND 

ENDIF 

If NOT MVFLAG is true, subroutine MOVE2? will be needed and so will 
t e jump instruction. Also, whenever a string move is indicated by a 
missing third parameter, we need a jump around the string. Otherwise 
subroutine MOVE2? and the jump instruction are omitted. 

It is important to notice that the two expressions on either side of the 
logicalOR operation, NOT MVFLAG and NUL BYTES, must appear in the 
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move macro from, to, bytes 

;;(Put current date here) 

;,inline macro to move text 


MOVE2?: 


LOCAL 

AROUND, MESG 


PUSH 

H 


PUSH 

D 


PUSH 

B 


IF 

NOT NUL TO 


LXI 

ENDIF 

D,TO 


IF 

NUL BYTES 

;;string move 

LXI 

H,MESG 

;;test 

LXI 

B,AROUND-MESG 


ELSE 


;;not string move 

IF 

NOT NUL FROM 


LXI 

ENDIF 

H, FROM 


LXI 

B, BYTES 


ENDIF 


;;string/not string 

CALL 

MOVE2? 


POP 

B 


POP 

D 


POP 

H 


IF 

NOT MVFLAG OR NUL BYTES 

JMP 

ENDIF 

AROUND 


IF 

NOT MVFLAG 


MOV 

A,M 

;get byte 

STAX 

D 

;new place 

INX 

H 

;from 

INX 

D 

;to 

DCX 

B 

;byte count 

MOV 

A,C 


ORA 

B 

;not done 

JNZ 

MOVE2? 


RET 


Figure 4.15: Macro MOVE, Version 3 
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MVFLAG 

SET 

ENDIF 

TRUE 

MESG: 

IF 

NUL BYTES 

AROUND: 

DB 

ENDIF 

ENDM 

FROM 


;;one copy 
;;not MVFLAG 


;;text 

;;MOVE 


Figure 4.15 (continued) 


order shown. They cannot be interchanged or the assembler will interpret 

^“° n dlfferent I y - This is due to the o^er of evaluation of the 
NUL and OR operators. The expression 

NUL BYTES OR NOT MVFLAG 

is interpreted as 

NUL (BYTES OR NOT MVFLAG) 

This is not the same as 

(NUL BYTES) OR NOT MVFLAG 
which is the desired result. 

MOVFT St A 9 M thi w d VerS lT ? f macr ° MOVE ’ create a file named 
tn?oot i^ andC ? y flle MOVE 2.ASM into it. Alter MOVE3.ASM 
d h 8UrC n Assemble the Program and load it into memory 

D1 So 1A F ^ l flFSt Part ° f the Pr ° gram with the command 

D100.1AF. Notice that the final jump is located at address 17C hex: 


0100: 

0110 : 

0120 : 

0130: 

0140: 

0150: 

0160: 

0170: 

0180: 

0190: 

01A0: 


C3 1A 
54 45 
21 3A 
12 23 
11 5C 
58 01 
01 01 
21 98 
3D 3D 
63 72 
6E 64 


01 56 65 
53 54 4D 
01 01 03 

13 0B 79 
00 21 52 
02 46 49 

14 00 CD 
01 01 10 
3D 3D 41 
6F 20 4D 
20 4D 4F 


72 20 
4F 56 
00 CD 
80 C2 
01 01 
46 54 
2F 01 
00 CD 
20 74 
4F 56 
56 45 


77 « 3 f 2E 38 31 2E ••• Ver 12.16.82. 

^ 2E 33 E5 D5 C5 11 75 00 TESTMOVE 3 u 
2F 01 Cl 01 El C3 3D 01 7E - • / 

Z nn rl It It 24 E5 05 C5 

06 00 CD 2F 01 Cl 01 El C3 .\.'R / 

48 E5 D5 C5 11 00 04 21 84 X..FIFTH.” """ 

Cl D1 El E5 D5 C5 11 14 04 ./ . 

2F 01 Cl 01 El C3 00 00 3C '. ’ "/.< 

“ ll It t 66 20 60 61 

t>\ nn nn nl 2 ° 73 65 63 6F Cro M0VE ’ A sec ° 

2E oo 00 00 00 00 00 00 00 nd MOVE. 
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Figure 4.16: Program to Test Version 3 of Macro MOVE 
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Execute the third version with the command G100.17C. Display the 

^ 5 2 l u ?F hCX With the command D50.7F. The result shows 
that the three dollar signs were moved to address 75 hex, a binary 2 was 

Placed aMC hex, and the string “FIFTH” was deposited immediately 


0050: 00 00 00 00 00 00 
0060: 54 48 00 00 00 00 
0070: 00 00 00 00 00 24 


00 00 00 00 00 00 02 46 

00 00 00 00 00 00 00 00 

24 24 00 00 00 00 00 00 


49 *6.FIF 

00 00 TH. 

00 00 .$$$....!!! 


A check can also be made of the region starting at 400 hex to see that the 
other two parts worked properly. All three versions of the MOVE macro 
are coded mime; that is, the macro statement is placed wherever it is needed 
The macro includes the JMP AROUND statement to skip over sub 
routine MOVE2? at the first reference 


A MACRO TO FILL MEMORY WITH A CONSTANT 

The MOVE macro we just developed can be used to deposit a string of 
characters in memory. As an example, we placed three dollar signs in the 
second file control block with the macro statement 

MOVE '$$$', FCB2+9 

MOVE maCr ° iS " 0t convenient if w e want to fill a large 
number of locations with a particular value. So we will now develop a 

companion macro named FILL. With this macro we can fill any portion 
just as the MOVE macro was. 

lihIarv r A < ! rate ^fu r0 FILL ’ Sh0wn in Figure 4 - 17 > into your macro 
library Also add the name FILL to the directory at the beginning of the 

macro library. This is the second macro in the library to use a flag 8 Many 

column S f 3dC ! t0 thC WiH USe flags > so we wil1 add a new 
column to the directory listing to identify the associated flag. The direc¬ 
tory should now look like this: 8 


;;Macros in this library 
;;ENTER MACRO 
;;EXIT MACRO 

;;FILL MACRO 

;;MOVE AAACRO 
;;VERSN MACRO 


SPACE? 

ADDR, BYTES, CHAR 
FROM, TO, BYTES 
NUM 


Flags 

(none) 

(none) 

FLFLAG 

MVFLAG 

(none) 
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FILL 

MACRO 

ADDR, BYTES, CHAR 

| 

•;(Put current date here) 



-Inline macro to fill byte memory 
••locations with CHAR starting at ADDR 


"Usage: 

FILL 

FCB + 1, BLANK, 8 


/ / 

FILL 

FCB+9, '?', 3 


ft 

LOCAL 

AROUND 



PUSH 

H 



PUSH 

B 



IF 

NOT NUL ADDR 



LXI 

ENDIF 

H,ADDR 



MVI 

C, BYTES 



MVI 

A,CHAR 



CALL 

FILL2? 



POP 

B 



POP 

H 



IF 

NOT FLFLAG 


FILL2?: 

JMP 

AROUND 

;put into memory 

MOV 

M,A 


INX 

H 

;pointer 


DCR 

C 

; count 


JNZ 

FILL2? 

;keep going 


RET 



FLFLAG 

SET 

ENDIF 

TRUE 


AROUND: 

ENDM 


;;FILL 


Figure 4.17: Macro FILL to Fill a Block of Memory with a Byte 


Notice that the address of the area to be filled is the first parameter to 
macro FILL. Because of the conditional expression 

IF NOT NUL ADDR 

LXI H,ADDR 

END IF 

the first parameter in the macro reference may be omitted. The second 
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parameter, the number of bytes in the block, is loaded into the C register. 

v“V S T, 8 "t )lt f glSter ’ the block size is limited to256 bytes. (A 
„„ K f °/ 1S 3 b *° Ck of 256 bytes ') If a larger block is needed, the macro 
can be referenced more than once. Alternatively, the macro could be 

doUtis^n Ch^terV**"" d ° Ub * e re 8* ster rat * ler than the C register. We will 

Tp™, a . C ° P , y “' i 1 ;' pro8ram in Figure 416 and 8™ it the name 
IESTFILL. ASM. Alter the program so it looks like the version shown in 

Figure 4.18. Notice that FLFLAG is set to FALSE near the beginning of 
e source program. This flag serves the same purpose as MVFLAG did in 

Shrn r T 0U pu 1^0 • ThC flag iS initial,y Set t0 FALSE 80 that a copy of 
ubroutme FILL2? is generated when the macro is first referenced. The 

flag is then set to TRUE in the macro so that no additional copies of 
riLL2. are made on subsequent references. 

Assemble the program and load it into memory with the debugger 

Display the program with the command ’ 

D100,16F 

The resulting output contains the familiar arrow pointing to an important 
jump mstruction at 156 hex. Notice that macros ENTER and EXIT are in- 

On f? r ^ V f erS1 ° n ' ThC FILL macro is used three times in this Program 
On he first reference, macro FILL deposits dollar signs in the second file 

MO VF ?n°fh * Perf ° rmS thC SamC task 38 the first reference to ma cro 

tbe P r f vl ° us Program. The next reference to macro FILL sets 

binary zeros 10 b a " kS and the final ref erence sets the next 40 hex bytes to 


!..9"c.1...".Ver 
12.24.81.TESTFI 
LL..!u...>$. 3 ... 
•w#..3....!, 


0100: 21 00 00 39 22 63 01 31 87 01 C3 22 01 sf, ai 73 

asssggggssg-ssssss 

0130. C3 3A 01 77 23 0D C2 33 01 C9 E5 C5 21 nn n« nc 

OHO: 40 3E 20 CD 33 01 Cl m c ,1 °° 08 0E .3.. 

0150: 00 CD 33 01 Cl El C3 5E 01 3 r 7 n Sf ?! *° 3E 3> ’ 3 . !a -- a> 

oi 60 : oi F9 c9 oo oo oo oo oo oo oo oo oS oo oo oS oo !:f!!!!^! 

kSs^fT^f bl °f 1 ththeCOnStant ^ USingthedebu ^ er command 

GlS 156 Th^n H *1 !J C r, eW Pr ° gram With the debu gg er command 
G100,156. Then display the filecontrol blocks with thecommand D50 7F 

and verify that the three dollar signs are present: 
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1 TITLE ' 

TESTFILL to test macro FILL' 


;Dec. 24, 81 



FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


/ 

boot 

EQU 

0 

;system reboot 

1 BDOS 

EQU 

5 

;BDOS entry point 

1 TPA 

EQU 

100H 

transient program area 

FCB1 

EQU 

5CH 

;input FCB 

1 FCB2 

EQU 

6CH 

;2nd parameter 

FLFLAG 

SET 

FALSE 

;FILL flag 

/ 

MACLIB 

CPMAAAC 


ORG 

TPA 



START: 





ENTER 




VERSN 

'12.24.81 .TESTFILL' 


FILL 

FCB2+9, 3, '$' 



FILL 

800H, 40H, BLANK 


FILL 

800H+40H, 40H, 0 


JMP 

DONE 



DB 

'<= = = =' 


DONE: 





EXIT 



| / 

END 

START 



Figure 4.18: Program to Test Macro FILL 

A final display of the 800 hex block will sh °w the of the second 
and third macro references. Give the command D800,88F. The results 
should look like this: 


0800 : 20 20 20 20 20 20 20 

0810 : 20 20 20 20 20 20 20 

0820 : 20 20 20 20 20 20 20 

0830 : 20 20 20 20 20 20 20 

0840 : 00 00 00 00 00 00 00 


20 20 20 20 20 20 20 20 20 
20 20 20 20 20 20 20 20 20 
20 20 20 20 20 20 20 20 20 
20 20 20 20 20 20 20 20 20 
00 00 00 00 00 00 00 00 00 
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c\lln : nn nn nn 2° °° 00 00 00 00 00 00 00 00 00 00 00 . 

0870- nn nn nn nn nn 2 ° °° 00 00 00 00 00 00 00 °0 00 . 

2!on' ?? ?? °° 00 00 00 00 00 00 00 00 00 00 00 00 00 . . 

0880: AS A5 A5 A5 A5 A5 A5 AS AS A5 A5 A5 A5 A5 A5 A5.i!!!!!!.".'! 

Return to CP/M by typing control-C. Now we will develop a pair of 
macros for comparing one region of memory to another. 


A MACRO TO COMPARE TWO BLOCKS 
OF INFORMATION 

We will often need to determine whether a particular memory area 
matches another memory area or string of characters. For example, in 
Chapter 6 we will write a program to display an ASCII disk file on the 
video screen. A binary COM file cannot be displayed in this way, so we 
will want to compare the file type the user has entered to the string COM 
The program can be terminated when a COM file is given. 

As a second example, suppose a program needs a file name, but the user 
enters an ambiguous file name such as 

SORT. * 

The CCP converts the asterisk to three question marks. The program is 
looking for a single file name but the CCP gives 

SORT.??? 

In this case the program may have to deal with many different files rather 
han a single file. To be prepared for this possibility, we must compare the 
input file name to a string of question marks. 

The inline macro COMPAR, shown in Figure 4.19, can be used to 
make general comparisons of blocks up to 256 bytes in length. If you want 
to compare two memory regions, give the addresses of each block as the 
‘ rSt * ndsecond P aram eters. The number of bytes in each block is given as 
the third parameter. The maximum block size is 256 bytes, because the C 
register counts the block size. Copy this macro into your macro library, 
placing it m alphabetic order. } 

The conditional blocks 


IF NOT NUL FIRST 


and 


IF NOT NUL SECOND 
allow either or both of the first two 


parameters to be omitted. If the 
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COMPAR MACRO FIRST, SECOND, BYTES 
;;(Put current date here) 

;,-Inline macro to compare 2 memory areas. 
"Zero flag is set if both are the same, 

-first and second may be addresses, 

;;third parameter is number of bytes. 

"First parameter may be a quoted string, 

;;in which case there is no third parameter. 
••Any of the parameters may be omitted. 
"Register A is altered. 


COMPAR 

FCB1, FCB2, 12 

COMPAR 

'???', FCB1 +9 

COMPAR 

,,5 

LOCAL 

MESG, AROUND 

PUSH 

H 

PUSH 

D 

PUSH 

B 

IF 

NUL BYTES 

LXI 

H,MESG 

MVI 

C,AROUND-MESG 

ELSE 

IF 

NOT NUL FIRST 

LXI 

H,FIRST 

ENDIF 

IF 

NOT NUL BYTES 

MVI 

C,BYTES 

ENDIF 

ENDIF 

IF 

NOT NUL SECOND 

LXI 

D,SECOND 

ENDIF 

CALL 

COMP2? 

POP 

B 

POP 

D 

POP 

H 

IF 

NOT CMFLAG OR 1 

JMP 

AROUND 


;quoted text 
;length 


;nul bytes 


Figure 4.19: Macro COMPAR to Perform a Binary Comparison 
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ENDIF 

IF 

COMP2?: 

LDAX 
CMP 
RNZ 
I NX 
I NX 
DCR 
JNZ 
RET 

CMFLAG SET 
ENDIF 
IF 

MESG: DB 

ENDIF 

AROUND: 


NOT CMFLAG 

D 

M 

H 

D 

C 

COMP2? 

TRUE 

NUL BYTES 
FIRST 


ENDM 


;one copy 
/compare routine 
;get char 
/same? 

/no 

/pointers 
/and count 
/keep going 

/only one 

//text 

//COMPAR 


Figure 4.19 (continued) 

parameters are missing, the registers must be loaded prior to referencing 
the macro. The macro call might look like this: 8 

COMPAR , , 8 

If you want to determine whether the first and second parameters of a 
CP/M command line are identical, use the following macro reference: 


the 

are 


COMPAR FCB1, FCB2, 12 

This will compare the 12 bytes starting at the first file control block to 
12 bytes in the second. The macro will set the zero Hag if the two blocks 
identical. The zero flag will be reset otherwise. 

If you want to compare a memory block to a particular string of text 

ton SelfTh thC thl M Pa f. ameter - The first P aram eter then contains the 
tot itself. The assembler finds the length of the block from the length of 

the first parameter. For example, the macro reference 
COMPAR '???', FCB1 +9 

will set the zero flag if the three characters starting at FCB1 +9 are all 

question marks. (FCB1 + 9 contains the file type of the first parameter of 
a CP/M command line.) 
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An ASCII Comparison 

Although each byte contains eight bits, the ASCII character set uses only 
the lower seven bits (0-6). Since the high-order bit, bit 7, is not neededm 
this case, it can be used to convey other information. Thus one 8-bit byt 
can be divided into a 1-bit flag followed by a 7-bit ASCII character The 
byte does double duty. The CP/M system uses this method to denote file 
protection and thus reduce the likelihood of accidentally erasing important 
files. For example, CP/M file names consist of a primary name and an ex¬ 
tension of up to three characters. The extension often suggests the land of 
formation contained in the file (FOR for FORTRAN, BAS for BASIC, 
and so on). If the high-order bit of the first character of the extension is 
set CP/M considers the file to be write protected. On the other hand, if 
this bit is reset, the file can be deleted or altered. The remaining seven bits 

contain the ASCII character. L It 

Suppose we want to ensure that a given file has the extension COM. It 
appears that we could use the macro reference 

COMPAR 'COM', FCB1 +9 

for this purpose. However, this approach will fail whenever the given file 
is writeprotected. For example, the ASCII representation oftheletter C is 

100 0011 


which we can write as 


0100 0011 

when the high-order bit is zeroed. However, if the file is write protected, 
the high-order bit is set. The pattern is as follows: 


1100 0011 


We therefore need a different version of the comparison macro, so that 
we can compare only the lower seven bits of each byte. The macro given in 
Figure 4.20 can be used for this purpose. Enter this macro into your library. 


COMPRA AAACRO FIRST, SECOND, BYTES 
;;(Put current date here) 

;;ASCII version (high bit is zeroed). 

-Inline macro to compare two memory areas. 
"Zero flag is set if both are the same, 


Figure 4.20: Macro COMPRA to Perform an ASCII Comparison 
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//first ond second may be addresses. 

/‘/’third parameter is number of bytes. 

;;First parameter may be a quoted string. 

;;in which case there is no third parameter. 

'/'AH three parameters may be omitted. 

;;Register A is altered. 


// 

;;Usage: COMPRA 

FCB1,FCB2, 11 

COMPRA 

'COM', FCB1 +9 

;; COMPRA 

, FCB1+1, 11 

LOCAL 

MESG, AROUND 

PUSH 

H 

PUSH 

D 

PUSH 

B 

IF 

NUL BYTES 

LXI 

H, MESG ;quoted text 

MVI 

C,AROUND-MESG .length 

ELSE 


IF 

NOT NUL FIRST 

LXI 

H, FIRST 

ENDIF 


IF 

NOT NUL C 

MVI 

GBYTES 

ENDIF 


ENDIF 

;nul bytes 

IF 

NOT NUL SECOND 

LXI 

D, SECOND 

ENDIF 


CALL 

COMP2? 

POP 

B 

POP 

D 

POP 

H 

IF 

NOT CMFLAG OR NUL BYTES 

JMP 

AROUND 

ENDIF 


IF 

COMP2?: 

NOT CMFLAG ;one copy 


/compare routine 

LDAX 

D ;get char 


Figure 4.20 (continued) 
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ANI 

7FH 

;mask bit 7 


PUSH 

B 



MOV 

C,A 



MOV 

A,M 



ANI 

7FH 



CMP 

C 

;same? 


POP 

B 



RNZ 


;no 


INX 

H 



INX 

D 

;pointers 


DCR 

C 

;and count 


JNZ 

COMP2? 

;keep going 


RET 



CMFLAG 

SET 

TRUE 

;only one 


ENDIF 




IF 

NUL BYTES 


MESG: 

DB 

FIRST 

;;text 


ENDIF 



AROUND: 



;;COAAPRA 


ENDM 




Figure 4.20 (continued) 


A MACRO TO RAISE LOWERCASE LETTERS 
TO UPPERCASE 


Any lowercase letters given on a CP/M command line are automatically 
raised to uppercase. However, if the user inputs information while aprogram 
is executing uppercase and lowercase letters remain distinctly different. 
For example, suppose that a program displays the statement 


DELETE ALL FILES? 

It is not sufficient to test the user response with the statement 


CPI 'Y' 

because the input might be either uppercase or lowercase. Of course, it is 
possible to consider both possibilities with additional instructions. For 

example: 


CPI 'Y' 
JZ 

CPI y 
JZ 
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A more efficient approach, however, is to use the macro given in Figure 
£21 to raise a lowercase letter to uppercase. The macro is referenced just 
before the comparison is made: 3 


UCASE 

CPI 'Y' 

JZ 


ASrn h T 3 u d u the ° Perati0n ° f this macro ^ considering the 

Y nnH^ti| 0< ? in8 °^ a pbabetlc charact crs. For example, the uppercase letter 

Y and the lowercase letter y differ by only one bit. The lower seven bits of 
each are as follows: 


Y 101 1001 (uppercase) 
y 111 1001 (lowercase) 


UCASE MACRO 

REG 

;;(Put current date here) 

;;lnline macro to convert a character in any 

;;register to uppercase. 

;;Omit parameter for 

register A. 

/ / 

;; Usage: UCASE 

;; ucase 

c 

// 

LOCAL 

NOTUP? 

IF 

NOT NUL REG 

PUSH 

PSW ;save 

MOV 

A,REG ;get value 

ENDIF 

CPI 

Z +7 ,'uppercase? 

JC 

NOTUP? ;no 

ANI 

NOTUP?: 

;make uppercase 

IF 

NOT NUL REG 

MOV 

REG,A ;putback 

POP 

/restore 

ENDIF 


;; UCASE 

ENDM 


Figure 4.21: Macro UCASE to Convert Lowercase Letters to Uppercase 
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The patterns for the other alphabetic characters are similar. The example 
shows that we can convert a lowercase letter to uppercase by resetting bit 
5. The operation we want is a logical AND with the value of 5F hex. 


y 111 1001 

AND 5F 101 1111 

Y 101 1001 


(lowercase) 

(uppercase) 


This approach works properly for lowercase letters. It also gives the 
desired answer when applied to uppercase letters. 


Y 101 1001 
AND 5F 1 01 1111 

Y 


(uppercase) 


101 1001 (uppercase) 


That is, we can use the same operation on either uppercase or lowercase 
letters and we will get uppercase letters. Remember that this technique 

designed to work only for letters. , . , 

Consider, for example, what would happen if we performed a logic 
ANDwiththe value 5F hex and the ASCII number 8. The bit patterns are 

as follows: 


AND 


8 

5F 


011 1000 
ioi mi 

001 1000 


(number 8) 
(control-X) 


We have converted the number 8 into the character control-X. 
therefore be careful to apply the conversion routine only to letters. (The 
are several special characters, such as the braces, that are located with 
lowercase letters. However, this is not likely to be a problem.) 

The macro contains the following instructions: 

CPI 'Z'+7 
JC 

The CPI instruction determines whether the character is lowercase. The 
value of the lowercase letter ‘a’ is seven greater than the value of an upper¬ 
case letter Z. So if the character has a value less than a lowercase lette , 

the JC instruction causes a branch around the logical AND operation. ( 
we consider it important enough, we could add a second test to th ® pr °® r 
for characters that have values greater than z. This wouldl ensure that 

program would only try to convert characters from a to z. However 

this is a minor point, because there are only a few characters in the ASCII 
^AseconTfeature of UCASE is the optional parameter. If the parameter 
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is omitted, the character is expected to be in the accumulator. However if 
a register is given as a parameter, the assembler will insert additional in¬ 
structions to operate on the character in the given register. For example 
the macro reference y ’ 


UCASE C 


will generate the additional instructions 

PUSH PSW 

MOV A,C 

at the beginning of the macro expansion and the instructions 

MOV C,A 

POP PSW 


at the end. 


We will usually include macro UCASE in programs that 
from the operator. 


require input 


A MACRO TO CONVERT AN AMBIGUOUS FILE 
NAME TO AN UNAMBIGUOUS FILE NAME 

In Chapter 7 we will write a program for renaming disk files. The pro- 
grrnn will allow ambiguous file names, and the original file name will be 
given before the new file name. 

If we give the command 

RENAME SORT.PAS *.BAK 

we want the result to be the same as if we had given the command 
RENAME SORT. PAS SORT. BAK 

That is, the file name *.BAK must be changed into SORT.BAK. This 
conversion occurs in two steps. 

The CP/M system will convert the first parameter to a slightly different 
form and place it m the file control block at 5C hex. This location is given 
the symbolic name FCB1 (or sometimes simply FCB) in this book. CP/M 
sToTh^endecimal point separating the primary name from the exten- 

rhL i? f 1 ° U u, hC f ° Ur characters of the Primary name to eight 
characters by using blanks, and it places them in memory starting at 5D 

hex. The extension name is placed immediately after the primary name. 

The second parameter is placed into memory starting at 6C hex The 
symbolic name FCB2 refers to this location. CP/M converts the asterisk 
into eight question marks and puts them into memory starting at 6D hex 
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The extension name is placed after the primary name. The second param- 
ctcr becomes ^^????.BAK. 

At some point, the question marks in the second file name will have to 
be converted by our program into the four letters ‘SORT and four blanks 

corresponding to the first file name. 

Macro AMBIG, given in Figure 4.22, can be used to convert an ambiguous 


1 AMBIG 

AAACRO 

OLD, NEW 



(Put current date here) 



Inline macro to change ambiguous file name 

/ 

at FCB NEW to match FCB OLD. 


/ 

/ 

Usage: 

AMBIG 

FCB1, FCB2 


/ 


PUSH 

H 




PUSH 

D 




PUSH 

B 




LXI 

H,NEW+1 




LXI 

D,OLD + l 




MVI 

C,ll 

;number of char 

AMB2?: 






MVI 

a /?' 




CMP 

M 

question mark? 



JNZ 

AMB3? 

;no 


copy one 

i char from 

original to new 



LDAX 

D 

;get old char 



MOV 

M, A 

;put into new 


AMB3?: 






INX 

H 

;new 



INX 

D 

;orig 



DCR 

C 

;count 



JNZ 

AMB2? 




POP 

B 




POP 

D 




POP 

H 






;; AMBIG 



ENDM 




Figure 4.22: Macro AMBIG to Convert an Ambiguous File Name to an 
Unambiguous File Name 
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file name located at one address to an unambiguous file name located at 
another address. In this example, the address of the unambiguous file 
name is the first parameter (OLD) and the address of the ambiguous file 
name is the second parameter (NEW). Each character is examined, one at 
a time. Whenever a question mark is found in the ambiguous file name, it 
is replaced by the corresponding character of the unambiguous file name. 

or example, the first question mark is replaced by S, the second by O 
and so forth. Copy this macro into your macro library. 

Macro AMBIG begins by saving the original contents of the HL DE 
and BC registers. Then HL and DE are given the addresses corresponding 
o the parameters NEW and OLD. Register C is loaded with the value of 
11, the file name length (8 + 3). 

The accumulator is loaded with a question mark. Then each character 

in the new name is compared to the question mark in the accumulator 
The instruction is 


CMP 


M 


If a question mark is discovered, the corresponding character is copied 
trom the old name. The instructions are as follows: 


LDAX 

MOV 


D 

M, A 


After each comparison, the count in register C is decremented. When the 
value reaches zero, the routine is finished. The original contents of the 
registers are restored by POP statements. 

A MACRO TO MOVE THE UPPER FOUR BITS 
TO THE LOWER POSITION 

The three methods of representing numbers in a computer are ASCII 
binary, and binary-coded decimal (BCD). ASCII numbers require seven 
bits so each byte can store a maximum of one ASCII character (digit), 
ith binary representation, we can code values from 0 to 255 decimal 

nnr Wt TU } T 510816 ^ ^ BCD m ° de ’ «“* di 8 k iS ™ded with 

tour bits. Thus, a byte can represent BCD numbers from 0 to 99 
t . T rf BCD method is nothing more than a hexadecimal coding, except 
at the hex digits A - F are not used. Therefore, a routine that converts a 
inary number to hexadecimal can also be used to decode a BCD number. 
In the next chapter we will write a macro for converting a binary number 
to two hexadecimal characters. 3 

There will be occasions, however, when we are only interested in the left 
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character (or nibble) of a BCD or hexadecimal number (for example, in 
macro OUTHEX in Chapter 5). Therefore, we will now write a macro for 
obtaining this upper half of the byte. Macro UPPER, shown in Figure 
4.23 first rotates the upper four bits down to the lower four bits (by per¬ 
forming the RAR instruction four times), and then zeros the new upper 
four bits by performing a logical AND with the value OF hex. If the op¬ 
tional parameter is provided, the operation is performed on the register 
name (including memory) given as the parameter. Incorporate this macro 
into your library and enter the name in the directory. 


UPPER 

MACRO 

REG 


;;(Put current date here) 

;;AAacro to move the upper 4 bits of the 
-accumulator to the lower 4 bits. The 
;;new upper 4 bits are zeroed. 


;;Use this macro to isolate the left 
;;character of packed BCD numbers. 


/ / 

;; Usage: 

UPPER 


;rotate down 

/ / 

OUTHEX 


;print 

/ / 

IF 

NOT NUL REG 



PUSH 

PSW 

;save A 


MOV 

ENDIF 

A, REG 

;move to A 


RAR 


;move to 


RAR 


;low half 


RAR 




RAR 




ANI 

OFH 

;mask upper 


IF 

NOT NUL REG 



MOV 

REG,A 

;put back 


POP 

PSW 

;restore A 


ENDIF 


-UPPER 


ENDM 




Figure 4.23: Macro UPPER to Move the Upper Four Bits of a Byte to the Lower 
Four Bits 
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A MACRO TO PERFORM 16-BIT SUBTRACTION 

Both the 8080 and Z80 CPUs can perform 8-bit addition and 8-bit sub¬ 
traction with and without considering the carry flag. In addition, the Z80 
can perform 16-bit subtraction with carry. It is important to note, 
however, that the Z80 double-register subtraction always includes the 
carry in the subtraction. Therefore, we must reset the carry flag before we 

subtracdon 1 ^ 011011 ° f C ° UrSe ’ C£UTy flag reflects the result of the 

The final macro in this chapter is given in Figure 4.24. It can be used to 
per orm 16-bit subtraction without considering the carry flag. We will 
need to use macro SBC in several programs to calculate the distance from 
one memory location to another. 

This 8080 version of a double-register subtraction calculates the differ- 
ence between the value in HL and the value in DE. The result is placed in 
, , 1 J* S ^ te ° f the „ carry flag at the beginning of the calculation is not 

’ b "l ‘ he Carry flag . at the end of the Process correctly reflects the 
result. That is, if the original value in DE is larger than that in HL, the 
carry flag will be set at the conclusion of the calculation. This macro is 


SBC MACRO 
;;(Put current date here) 

;;lnline macro to subtract DE from HL. 
/'-'The result is in HL. This is almost 
-'-‘the Z80 SBC HL,DE opcode. 


Usage: SBC 

SBC 

HL,DE 

MOV 

A,L 

SUB 

E 

MOV 

L,A 

MOV 

A,H 

SBB 

D 

MOV 

H,A 

ENDM 



FigUre 4 24: Macro SBC to Perform 16-Bit Subtraction without Carry 
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equivalent to the two Z80 instructions 

OR A 
SBC HL,DE 


SUMMARY 


In this chapter, we have explored the importance of macro processing 
and we have developed several elementary macros. We will incorporate 
these macros in the programs we write in later chapters. It should be noted 
that these macros all have a common feature—they do not perform 
BDOS calls. In the next three chapters we will consider macros that use 
BDOS calls, and we will write programs that incorporate these macros. 

The directory of your macro library should now look like this. 


;;Macros in this library 
;;AMBIG MACRO 
;;COMPAR MACRO 

;;COMPRA AAACRO 

;;ENTER MACRO 

;;EXIT MACRO 

;;FILL MACRO 

-MOVE AAACRO 

;;SBC AAACRO 

"UCASE MACRO 

"UPPER MACRO 

;;VERSN MACRO 


OLD, NEW 

FIRST, SECOND, BYTES 
FIRST, SECOND, BYTES 

SPACE? 

ADDR, BYTES, CHAR 
FROM, TO, BYTES 

REG 

REG 

NUM 


Flags 

(none) 

CMFLAG 

CMFLAG 

(none) 

(none) 

FLFLAG 

MVFLAG 

(none) 

(none) 

(none) 

(none) 

















































































OPERATIONS 


INTRODUCTION 

In this chapter we will learn how to perform console input, console out¬ 
put, and list output by using the CP/M basic disk-operating system 
(BDOS). We will develop a number of useful macros to make these tasks 
easier. Along the way, we will write macros that convert binary numbers 
to decimal and hexadecimal characters, and hexadecimal characters to 
binary numbers. Finally, we will incorporate these macros into four exe¬ 
cutable programs that show us more about CP/M’s organization. The 
program CPU determines whether an 8080 or a Z80 CPU is being used- 
IOBYTE displays and alters the CP/M IOBYTE feature we designed in 
Chapter 3; GO branches to an absolute address in memory; PAGE ejects 
one or more pages on the printer. 
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BDOS CALLS 

As we saw in Chapter 1, the CP/M operating system divides the com¬ 
puter memory into several distinct regions. The upper portion of memory 
is called the full disk-operating system (FDOS) and is further divided into 
two regions. The basic input-output system (BIOS) occupies the upper 
part of FDOS, and the basic disk-operating system (BDOS) occupies the 
lower part of FDOS. In Chapter 3 we studied the organization of the 
BIOS and added several new features. We will now consider the BDOS. 

The BIOS contains the primitive routines for operating the console, the 
printer, and the disks. These routines must be specifically programmed 
for the actual physical devices that are attached to the computer. Dif¬ 
ferent computers will have different versions of BIOS. It is possible for 
CP/M executable programs to perform input and output operations by 
communicating directly with the BIOS. However, it is easier to use the 
BDOS as an intermediate to BIOS. All console, printer, and disk opera¬ 
tions can be performed through the BDOS by using a special location in 
memory. Because BDOS is device independent, programs that operate on 
one CP/M computer will also operate on any other CP/M computer, 
even though the hardware and BIOS routines may be different. 

Using BDOS to perform peripheral operations is not only more ver¬ 
satile, it is also more convenient. Recall that the first three bytes in 
memory, starting at address 0, contain a jump instruction to the warm- 
start vector of the BIOS. The next byte, at address 3, contains the 
IOBYTE. The following byte, address 4, indicates two things: the current 
disk drive and the current user number. The next three bytes, starting at 
address 5, contain a jump into the BDOS. This is the location that can 
always be called when console, printer, and disk operations are needed. 
Contrast this single jump address into BDOS to the multiple jump vectors 
at the beginning of the BIOS. The BIOS uses a separate entry point for 
each different operation. 

We will now consider some simple BDOS operations. 


Nondisk BDOS Function Numbers 

When an executable program interacts with the peripherals through the 
BDOS, it calls the BDOS entry point at address 5. At this time, the C 
register of the 8080 or Z80 CPU contains a function number indicating the 
desired operation. The information sent by the program is placed in the E 
register if the value is byte size, or in the DE register pair if it is two bytes. 
Information is usually sent back to the calling program in the accumu¬ 
lator if byte size or in HL if it is two bytes. 
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Table 5.1: The Nondisk BDOS Functions 


Function 

number 

(inQ 

Operation 

Value sent 

Value returned 

1 

Read console 


character in A 

2 

Write console 

character in E 


3 

Read reader 


character in A 

4 

Write punch 

character in E 


5 

Write list 

character in E 


6 

Direct console I/O 

FF (input) 
character (output) 

0 = not ready or 
character in A 

7 

Determine IOBYTE 


byte in A 

8 

Set IOBYTE 

in E 

9 

Print buffer 

address in DE 


10 

Read buffer 

address in DE 


11 

Return console status 


byte in A 

12 

Return CP/M version 


byte in A and L 


We can perform many different operations with BDOS calls. We can 
divide the functions into two groups. One group deals with the console, 
reader, punch, and list devices. The other group performs disk opera¬ 
tions, which will be considered in the next chapter. Here we will look at the 
nondisk functions. Table 5.1 summarizes the first 12 BDOS functions. 
These functions deal with the four logical devices—the console, the 
printer, the list, and the punch—as well as operations involving the 
IOBYTE and the CP/M version number. We will be explaining these 
operations as the chapter proceeds. Let us now consider a macro for per¬ 
forming general BDOS calls. 


A MACRO TO PERFORM BDOS CALLS 

The BDOS functions all work in the same way. Address 5 is called with 
the function number in register C. Information is sent in the E or DE 
register and returned in the accumulator or HL. Because the contents of 
the CPU registers change during the BDOS operations, it is usually 
necessary to save the registers on the stack before calling the BDOS. The 
registers are then restored after the return from BDOS. One note of cau¬ 
tion, however: if we save the accumulator and flag register with a PUSH 
PSW instruction and then restore them with POP PSW, we will lose any 
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information that was returned from BDOS in the accumulator. 
Therefore, the accumulator should not be saved during input operations. 

The macro shown in Figure 5.1 will be referenced by several other 
macros we will write. Add it to your macro library in alphabetic order. Be 
sure to enter the name into the directory at the beginning of the library. 

Our macros are usually designed for direct, inline use. If a subroutine 
or a line of text must be included, there is a branch to get around the 
obstruction. Macro SYSF, however, is always referenced as a subroutine. 
We do not have to include a branch around the routine, because macro 
SYSF will generally be called by another macro that already includes the 
branch. However, if you use macro SYSF directly in the line of instruc¬ 
tions, you must provide a branch around the routine. 

Macro SYSF has two dummy parameters. The first parameter is the 
function number, which is loaded into register C. The second parameter 
is optional. It will be used only when we must transfer a byte from the 
accumulator to register E prior to calling BDOS for output (see macro 
PCHAR in Figure 5.3). 

The macro begins by saving the HL, DE, and BC registers on the stack 
and loading the function number (the first parameter) into register C. If 
the optional second parameter is provided, the value in the accumulator is 
moved into register E and the accumulator is saved with PUSH PSW. The 
BDOS address is called to perform the desired function. After returning 
from BDOS, the accumulator is restored with POP PSW if it was 
previously saved. The other registers are restored and control returns to 
the calling program. 


A MACRO TO READ A SINGLE 
CONSOLE CHARACTER 

The first two BDOS functions are very important. Function 1 is used to 
read a single character from the console, and function 2 is used to write a 
single character on the console. Actually, these two functions are not 
complementary. When a console character is read with function 1, it is 
also displayed on the terminal at that time. Function 3 is similar to func¬ 
tion 1 except that the character is obtained from the logical reader rather 
than from the console. 

We can obtain a single character from the console by placing the func¬ 
tion number 1 in register C and calling address 5. The 8080 instructions 
are as follows: 

MVI C,1 

CALL 5 
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SYSF MACRO 

FUNC, AE 

;;(Put current date here) 

;;Macro to generate BDOS calls. 

;;FUNC is BDOS function number for C. 

/'/‘THIS IS NOT AN INLINE AAACRO. 

;;Move A to E if there 

is a second parameter. 

;;Usage: OPEN: 

SYSF 15 

;; PCHAR: 

SYSF 2,AE 

/ / 

PUSH 

H 

PUSH 

D 

PUSH 

B 

MVI 

C,FUNC 

IF 

NOT NUL AE 

MOV 

E/A /console and list 

PUSH 

PSW /save A 

CALL 

BDOS 

POP 

PSW 

ELSE 


CALL 

BDOS 

ENDIF 


POP 

B 

POP 

D 

POP 

H 

RET 



//SYSF 

ENDM 



Figure 5.1: Macro SYSF to Generate a BDOS Call 


We can generate these instructions by using macro SYSF with the ap¬ 
propriate parameter. When the instructions are executed, BDOS calls the 
BIOS vector that performs console input. The next character entered 
from the console is read by the BIOS. Control then returns to the calling 
program through BDOS. The character is available in the accumulator. 

Occasionally we will need to check the console status to determine 
whether the user has pressed a console key. We will then place function 
number 11 in register C and call the BDOS address. On return from 
BDOS, the accumulator contains a value of FF hex if a console character 
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has been typed. The accumulator contains a value of 0 otherwise. 

When console input is performed with the BDOS function 1, the system 
waits until the console is ready. Because this function automatically per¬ 
forms a status check, it is not necessary to determine the console status by 
first making a call to BDOS function 11. On the other hand, if no 
character is typed, program execution ceases until a character is typed. 

When BDOS function 1 is used, printable ASCII characters, such as the 
letters and digits, are displayed on the video screen as they are entered 
Control characters such as the carriage return, line feed, tab (control-I), 
backspace (control-H), and control-C can also be read in this way, but 

they are not displayed on the screen. 

Macro READCH is given in Figure 5.2. Add it to your macro library. It 
no parameter is given, this macro generates instructions to read one 
character from the console and then return the character in the accu¬ 
mulator. However, if a parameter is provided, the character is returned in 
the register given by the parameter. 


READCH 

AAACRO 

REG 

;;(Put current date here) 


-Inline macrc 

i to read one character from 

;;the console; character is returned in register 

;;A unless a second parameter is given. 

;;Macro needed: SYSF 


;; Usage: 

READCH 



READCH 

C 


LOCAL 

AROUND 


CALL 

RDCH? 


IF 

NOT NUL REG 


MOV 

REG, A 


ENDIF 



IF 

NOT CIFLAG 


JMP 

AROUND 

RDCH?: 

SYSF 

1 

CIFLAG 

SET 

TRUE ;only one copy 


ENDIF 


AROUND: 


;; READCH 


ENDM 



Figure 5.2: Macro READCH to Read One Console Character 
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A MACRO TO WRITE A SINGLE 
CONSOLE CHARACTER 

A program can perform console output by putting the character into 
register E, the value of 2 in register C, and calling the BDOS entry at 
address 5. Functions 4 and 5 are similar to function 2, the only difference 
being where the output is sent. If the function number in register C is 4, the 
byte in register E is sent to the punch device. If the function number is 5 
the value is sent to the list device. 

Macro PCHAR, shown in Figure 5.3, performs the BDOS function 2 
We will use it frequently to send individual characters to the console, 
referencing it from other macros we write. Incorporate this macro into 
your library. Notice that macro SYSF is required. 

Macro PCHAR can be used to display the byte that is present in the accu¬ 
mulator. The macro name is placed in the source program as though it were 
an operation code. This macro can also be used to display a particular 
constant that is known at assembly time. The constant is given as a 


PCHAR 

AAACRO 

PAR 

;;(Put current date here) 

/'/’Inline macro to print one console char. 

,/Parameter, if present, is loaded into A. 

;;Macro needed: SYSF 


/ / 

;;Usage: 

PCHAR 


// 

PCHAR 

/*' 

/ / 

LOCAL 

AROUND 


IF 

NOT NUL PAR 


MVI 

ENDIF 

A, PAR 


CALL 

PCH2? 


IF 

NOT COFLAG 


JMP 

AROUND 

PCH2?: 

SYSF 

2,AE 

COFLAG 

SET 

ENDIF 

TRUE ;only one copy 

AROUND: 

ENDM 

;;PCHAR 


Figure 5.3: Macro PCHAR to Display Single Characters on the Console 
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parameter to the macro reference. For example, if we want to print an 
asterisk, we can use the expression 

PCHAR 

When the assembler encounters the parameter, it generates an additional 
instruction to move the parameter into the accumulator. It thus generates 
the same instructions as the two lines 

AAVI A,'*' 

PCHAR 

If two identical characters are needed, it is not necessary to give the 
parameter the second time: 

PCHAR '$' ;print dollar sign 

PCHAR ;second dollar sign 

These instructions will display two dollar signs. There is a potential prob¬ 
lem, however, because the original value in the accumulator is lost. For 
example, suppose you want to print a particular character, then display 
the original value in the accumulator. You will first need to save the value 
that was originally in the accumulator. The program might look like this: 

PUSH PSW 

PCHAR ;print asterisk 

POP PSW 

PCHAR ;original character 

A MACRO TO DISPLAY A CARRIAGE RETURN 
AND LINE FEED 

PCHAR can be used to display single characters, but frequently we will 
find it necessary to display a carriage return followed by a line feed. 
Because this combination requires two references to PCHAR, we will 
write a very short macro called CRLF to make the task easier. Copy the 
macro shown in Figure 5.4 into your macro library. 

Macro CRLF uses no parameters. It is referenced in a program 
wherever a carriage return and line feed are needed. The beginning of the 
macro calls the global subroutine CRLF2? to perform the desired opera¬ 
tion The subroutine first saves the accumulator on the stack, then 
references macro PCHAR twice. The accumulator is restored and control 
is returned to the beginning of the macro. A jump instruction allows the 

subroutine to be coded inline. . D 

Two flags are needed with macro CRLF—COFLAG for macro PCHAR 
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CRLF 

AAACRO 



;;(Put current date here) 
;;lnline macro to send a 



;;carriage return, line feed to console. 
/'/‘All registers saved including A. 


;;Macro needed: PCHAR 



! / 

LOCAL 

AROUND 



CALL 

CRLF2? 



IF 

NOT CRFLAG 

;just one 


JMP 

AROUND 

CRLF2?: 

PUSH 

PSW 



PCHAR 

CR 



PCHAR 

LF 



POP 

PSW 



RET 



CRFLAG 

SET 

ENDIF 

TRUE 

;only one copy 

AROUND: 

ENDM 


;;CRLF 


Figure 5.4: Macro CRLF to Generate a Carriage Return and Line Feed 


and CRFLAG for this macro. The latter flag ensures that there will only 
be one copy of subroutine CRLF2? and the corresponding jump instruc- 

subroutine^RLR?! referenCet0macroCRLFwillon ’ ygenerateaca N to 


MACROS SYSF ’ READCH ’ 

run it. The program begins with the usual macros ENTER and VERSN. 

en macro CRLF is used to begin a new line. Macro PCHAR prints a 
colon for a prompt symbol and macro READCH waits for user input 
An A A S ^" as a Slng ! e console character is typed, the program continues. 

A ^ I TI Z . er ° 1S ' ub l racted from th e user input. This operation converts 
the ASCII digits 0-9 to the corresponding binary digits. Of course, all 
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1 TITLE 'TEST PCHAR' 



;(Put current date here) 


FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

EQU 

0 

;system reboot 

1 BDOS 

EQU 

5 

;BDOS entry point 

TPA 

EQU 

100H 

;program start 

Cl FLAG 

SET 

FALSE 

;for READCH 

CRFLAG 

SET 

FALSE 

;for CRLF 

COFLAG 

SET 

FALSE 

;for PCHAR 

I / 

MACLIB 

CPMAAAC 


ORG 

TPA 



START: 





ENTER 




VERSN 

'(current date)' 


NEXT: 





CRLF 




PCHAR 

/./ 

; prompt 


READCH 


;number of char 


SUI 

'0' 

;make binary 


JZ 

DONE 

;quit on zero 


MOV 

C,A 



PCHAR 

BLANK 


LOOP: 





PCHAR 




DCR 

C 



JNZ 

LOOP 



JMP 

NEXT 


DONE: 





EXIT 



l / 

END 

START 

_ 1 


Figure 5.5: Program to Test Macros SYSF, READCH, PCHAR, and CRLF 
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other input characters are altered also. If the user inputs a value of 0 the 
S ram “ te ™ inat ^ d; otherwise, the value is saved in the C register A 

IS displayed. The program then starts again. 

An input in the range of 1 -9 will produce as many asterisks. The 

rive4o aSe i ett t r A " lH 81Ve 17 asterisks and the lowercase letter ‘a’ will 

have ASaTvah' * * he ^ Sig " and percent ^bol 

have ASCII values less than the digits, but because they are altered by the 

subtraction of an ASCII zero, they will produce several lines of asterisks 

PRINTING A STRING OF CHARACTERS 

In the previous section, we used BDOS function 2 to display individual 
characers on the console, oneatatime. However, frequently we will need 
to display a string of characters such as the expression 

?FILE NOT FOUND 

This is easily accomplished with BDOS function 9. The string is placed into 

Irfthe 0 ? and t rT ated Wkh a d0,lar sign - The address of the beginning 
of the string is loaded into the DE register and the value of 9 is placed into 

P° S is «*. is displayed on 777 

I hedolhr sign, of course, is not included in the display 

o C f r ° 8r T Sh ° Wn in FigUre 5 - 6 dem °nstrates the use of BDOS func- 

macro SYSF ?vn r e mg Characters on the cons °le. The program uses 
* ype m P r °g r am, assemble it, and execute it The 
resulting console output should be as follows: 

A test of BDOS function 9 

fid hi ^° 8 t ram ’il he deSirCd String beginS With a carriage return and line 
-These two characters are embedded in the console buffer in this exam 

^Previously we used macro CRLF for this purpose 

ap SroX?™! tCXt ’ i K? 1U X 8 thC tCrminal dollar sign > is closed by 
macro SYSF whX" , PtaC “ U* tCXt in “mediately ate 

— provides a branch aroi " ,d bMh - 5S5S5 


A Macro to Print a String of Characters 

Using function 9 to display a string of characters is more efficient than 
displaying individual characters with function 2. Nevertheless, we still 
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TITLE 'Print console buffer' 


(Put current date here) 


BOOT 

BDOS 

TPA 

EQU 

EQU 

EQU 

0 ;system reboot 

5 ;BDOS entry point 

100 H transient program 

/ 

MACLIB 

CPMMAC 

ORG 

TPA 


START: 

ENTER 

VERSN 

LXI 

CALL 

JMP 

'(current date).CONSOLE BUFFER 
D,TEXT 

SEND 

DONE 

SEND: 

SYSF 

9 

TEXT: 

DB 

DB 

CR,LF,'A test of BDOS' 

' function 9$' 

DONE: 

EXIT 

BOOT ;warm start 

; 

END 

START 


Figure 5.6: Printing the Console Buffer 


have to provide a branch around the string and a call to subroutine SEND. 
In this section we will write a new macro to further simplify the printing of 
strings. Our goal will be a macro called PRINT. Its use will be as simple as 
the following instruction: 

PRINT 'A test of BDOS function 9' 

That is, the parameter to the macro will be the string enclosed in 

a **Makeaoopy of the program shown in Figure 5.6 and 

Figure 5.8. We will use this program to test macro PRINT shown in 
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PRINT 

MACRO 

TEXT 


;;(Put current date here) 

,,lnline macro to print a literal string. 


;;Macro needed: SYSF 



// 

;; Usage: 

PRINT 

'message' 


if 

PRINT 

<CR,LF, 'messaged 


LOCAL 

MESG, AROUND 



PUSH 

D 



LXI 

D,MESG 



CALL 

POP 

PBUF? 

D 

;print message 


JMP 

AROUND 



IF 

NOT PRFLAG 

;need subroutine 

'Print message on console up to $ 


/ 

PBUF?: 

SYSF 

9 


PRFLAG 

SET 

ENDIF 

TRUE 

;no more copies 

/ 

MESG: 

DB 

TEXT/$' 


AROUND: 

ENDM 

;;PRINT 




Figure 5. 7: Macro PRINT, Version 1 


2®^ ^ 7 OU can incor Porate this macro into your macro library now 
but we will be writing a more general version in the next section. Conse- 

the nro’ yOU . may want to tem P° r arily insert this version into Figure 5 8 

ra«r r °f rai V!i- teSt i hC macro ’ rather than into your macro library. In that 
case pJace it directly after the MACLIB CPMMAC statement 

When the assembler encounters the PRINT macro, it places the desired 

string into memory starting at the location MESG. A dollar sign is 
u oma ically placed at the end of the string so that CP/M will know 
fwh C *!** term ‘ nates - The original value in the DE renter !s saved 

onthestackwithapushstatemeiit,thenthe DE register is loaded with (he 
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TITLE 'Print console buffer' 
/ 

;(Put current date here) 


FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

EQU 

0 

;system reboot 

BDOS 

EQU 

5 

;BDOS entry point 

TPA 

EQU 

100H 

;transient program area 

PRFLAG 

SET 

FALSE 

;print console buffer 

/ 

MACLIB 

CPMMAC 


/ 

ORG 

START: 

TPA 

ENTER 

VERSN 

PRINT 

'(current date)' 

<CR,LF/A test of BDOS function 9'> 

DONE: 

EXIT 

BOOT 

;warm start 

; 

END 

START 



Figure 5.8: Program to Test Macro PRINT 


address of MESG, the start of the string. Subroutine PBUF? is called to 
The string, fhe DE register is restored with a POP«an*a 
branch around both the subroutine and the string concludes the PR 

m Several features should be noticed in this example. The symbol 
PRFLAG is initially set to FALSE so that only one copy of subroutine 
PBUF 9 is generated. PBUF? is a global variable, while the labels MESG 
and AROUND are local variables. They will appear in each expansion of 
the macro, but they will be different symbols. Finally, in the main program 
we have surrounded the parameter to macro PRINT with angle brackets. 

<CR,LF,'A test of BDOS function 9'> 













saTO S aTtefoIe' "'” Pr ° gram ^ “' The resul < shoi " d * 


Macro Print, Version 2 

The macro we wrote in the previous section can be used to print strings 
o characters embedded in the source program, but we cannot prin/a 
dollar sign m this way. There will also be cases where we want to print a 
string stored at a particular memory location. We might not evenknow 
he location until execution time. We could adapt the 
this purpose if we place a dollar sign at the end of the string, but this may 
ways be convenient. We will now rewrite macro PRINT so it can 

parameter Str1 " 8 3nyWhere “ mem ° ry ° r given as the macro 

We will abandon the previous reference to BDOS function 9 which 
pnn s a suing of characers, and we will use function 2 instead We will 
L characters one at a time using macro PCHAR. Macro PRINT 
ca culates the string length and then determines the number of times to 
call the subroutine created by PCHAR. This may seem to be a ste D 
ackward, but it is not really. This version has the ability to print strings 
as wen" 5 " mem ° ry locatIon - and dollar signs can be embedded in the strings 

Incorporate the second version of macro PRINT, shown in Figure 5 9 
m o your macro library. Alter the test program in Figure 5.8 to look like 

^d U pRFLAG S1 af s ^ Tf, PRN2> N ° tice that two ^ COFLAG 
and PRFLAG, are required. Also notice that no regular 8080 operation 

this^mgra^^ fJ 1 th * S exai ? 1 ^ e ' ^ ere are only macro^references. A^anble 
program and execute it. Give the following CP/M command line: 

PRN2 TEST OF PRINT 

The program will respond with the following two lines: 

The first 12 characters of the command line tail are- 
TEST OF PRIN 

This program contains three references to macro PRINT. The first two 
aresimilartothe previous uses. The desired string isprimed ontoe console; 

The first 12 characters of the command line tail are: 

The third reference, however, is different. The presence of the second 
parameter in the macro reference is a signal to the assembler that the first 
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parameter contains the address of the string rather than the stnnghself. 
The first parameter references the beginning of the string at DBUFF+2. 
When any program is executed, CP/M places the command hne tail in 
memory starting at 82 hex. The HL register is therefore loaded with the 

^Letus^ee how*macro PRINT works by writing an executable program. 


1 PRINT 

MACRO 

TEXT, BYTES 

• -(Put current date here) 


"Inline macro to print string on console. 

•TEXT is address of string, BYTES is length. 

"TEXT may be in quotes 

if BYTES is omitted. 

;;Macro needed: PCHAR 


// 

"Usage: 

PRINT 

FCB1+1, 11 

•• 

PRINT 

'end of file' 


PRINT 

<CR,LF, 'messaged 

" 

PRINT 

,12 

/ / 

LOCAL 

AROUND, MESG 


PUSH 

H 


PUSH 

B 


IF 

NUL BYTES 


LXI 

H,MESG 


MVI 

B,AROUND-MESG 1 


ELSE 



IF 

NOT NUL TEXT 


LXI 

H,TEXT 


ENDIF 



MVI 

B, BYTES 


ENDIF 



CALL 

PBUF? 


POP 

B 


POP 

H 


IF 

NOT PRFLAG OR NUL BYTES 


JMP 

AROUND 


ENDIF 


L 

IF 

NOT PRFLAG I 


Figure 5.9: Macro PRINT, Version 2 
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PBUF?: 

MOV 

A,M 



PCHAR 




INX 

H 



DCR 

B 



JNZ 

PBUF? 



RET 



PRFLAG 

SET 

TRUE 



ENDIF 




IF 

NUL BYTES 


MESG: 

DB 

TEXT 


AROUND: 

ENDIF 


;;PRINT 


ENDM 




Figure 5 .9 (continued) 


TITLE Print console buffer* 
/ 

;(Put current date here) 


r 

FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

BDOS 

TPA 

DBUFF 

EQU 

EQU 

EQU 

EQU 

0 

5 

100H 

80H 

;system reboot 
;BDOS entry point 
,-transient program area 
,'default buffer 

COFLAG 

PRFLAG 

/ 

SET 

SET 

FALSE 

FALSE 

/console output 
;print console buffer 


MACLIB 

CPMMAC 


/ 

ORG 

TPA 



/ 

START: 

ENTER 




Figure 5.10: Program to Test Version 2 of Macro PRINT 
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VERSN 

PRINT 

'(current date)' 

<CR,LF/The first 12 characters of '> 

PRINT 

<'the command line tail are: ',CR,LF> 

PRINT 

DBUFF + 2, 12 

DONE: 

BOOT ;warm start 

EXIT 

END 

START 


Figure 5.10 (continued) 


A PROGRAM TO DISCOVER WHICH CPU 
IS BEING USED 

The 8080 (and 8085) instruction set is incorporated into much larger 

se^of instructions used by the Z80 CPU. Consequently, 8080 executable 
Sog am™ usually be run on a Z80 compute,. However, computer 
programs that use the special features of the Z80, such as block moves and 
relative jumps, will not run on an 8080 computer. ^„ r „ m 

Because of this difference, it may be necessary for a computer progra 
to detCTmine which CPU is being used. For example, if a program requires 
th^spedalZ80 instructions, it could terminate execution when 111S 
an 8080 Alternatively, two different sets of algorithms could be provided. 
Th~r=fficicn. version could be used when the program ,s run on a 
7 «n Otherwise the 8080 version could be selected. 

Because the 8080 and Z80 CPUs respond differently to arithmetic 
operations they can be distinguished easily. The difference lies in e 
behavior of the parity flag. The flag correctly reflects the result of logical 
rSts for both the 8080 and the Z80 CPUs. However for arUhmet c 

operations the results are different. For the howewsr ^set^dte 

of the result just as for logical operations. The Z80, however, sets i 
oarhy flag only if there is overflow (from bit 6 to 7) during an arithmetic 
operation. For this reason, the parity flag on the Z80 is called a pan y 

°We^distinguish the 8080 and Z80 CPUs by using the following three 
instructions: 


XRA 

DCR 

JPE 


A 

A 

NOTZ80 
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latL ^ h KH^ Th f rU ,° nS performs an excIus ive OR on the accumu- 
t he r ° g,Cal °P eration ^os the accumulator. It also sets 

TPIk h 0 ( u eanmg Paflty 1S even) on both the 8080 and the Z80 
CPUs, because there is an even number of ones (zero) in the result. 

heJ Thk X a rkh trU ?° n decrements the accumulator, giving a value of FF 
hex. This arithmetic operation will leave the 8080 parity flag set because 

8080 rPT n u deC / eme u nt 0peratlon becaus c there is no overflow. The 
Set Sr 1 ^ instruction because the 8080 parity flag 

flag * reset ’ beCaUse the Parity/overflow 

tn thrCe HneS C ° Uld be incor P° ra ted into a Z80-only program 

to detect when it was run on an 8080 CPU. Let us see how this works 
y writing a short assembly language program. 

The program given in Figure 5.11 will print the expression 

CPU is Z80 

when run on a Z80 computer. Otherwise the expression 
CPU is 8080 

will be displayed. Create a disk file named CPU. Type in the program 
assemble it, and execute it. P g , 

PRmT P mf am i be f inS T itbtheUSUalENTER and VERSNmacros. The 
• ^ lsp ays ^ginning of the message. The CPU type is de- 

» Semor™ ,hr f lin f' ' f the CPU is 808 °. «>' P'oera- branches 

Before we write our next executable program we will need to add two 

Z.im i h° Ur lbrary ' ThC flrSt macro converts Wnary numbers to hexa- 
cimal characters and displays them on the console. The second macro 
determines the CP/M version number. 


TITLE 'CPU tells if 8080 or Z80' 

/ 

;(Put current date here) 

; Usage: CPU 

Figure 5. 11: Program CPU to Determine whether CPU Is 8080 or Z80 
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mastering cp/m 



FALSE 

EQU 

0 



TRUE 

EQU 

NOT FALSE 



BOOT 

EQU 

0 

;system reboot 


BDOS 

EQU 

5 

;BDOS entry point 


FCB1 

EQU 

5CH 

;input FCB 


FCB2 

EQU 

6 CH 

;2nd parameter 

1 

DBUFF 

EQU 

80H 

;default buffer 


TPA 

EQU 

100H 

transient program area 


•Set flaqs in main program so only one 



•copy of certain subroutines will be generated. 


;Place set 

lines before AAACLIB call. 



COFLAG 

SET 

FALSE 

;console output 


PRFLAG 

SET 

FALSE 

;print console buffer 


;end of flags 



1 

/ 

AAACLIB 

CPAAAAAC 


1 

ORG 

TPA 



1 

START: 






ENTER 





VERSN 

'(current date).CPU' 



PRINT 

'CPU is' 




XRA 

A 

;zero 



DCR 

A 




JPE 

NOTZ80 




PRINT 

' Z80' 




JAAP 

DONE 



NOTZ80: 





PRINT 

' 8080' 



DONE: 






EXIT 




/ 

END 

START 



Figure 5.11 (continued) 
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A MACRO TO CONVERT BINARY 
TO HEXADECIMAL 


A binary-to-hexadecimal conversion is needed in many of the programs 
in this book. Any eight-bit binary value can be represented as two hexa¬ 
decimal characters; the resulting hex number is in the range 0-FF hex 
As you know, information is stored in a computer as a sequence of 
binary digits (0 or 1), with each digit being called a bit, and a group of eight 
bits being called a byte. Sometimes we need to determine the value of a 
particular byte. However, we cannot simply transfer the byte to the con- 

bhlarynumbe? 6C ° nS ° le “““ ASCI1 ’ ® seven - bitcode - For example, the 


0100 1011 


i aS !^ ecimal value 0f 4B - However > this bit pattern corresponds to 
,^ C J e “ er K - ?° lf thls b y te were sent to the console, we would see 
T r,M WC " Ced aroutine to tran smit the ASCII numeral 4 and then 
the ASCH letter B. This is called a binary-to-hexadecimal routine 

. fJ, 0t , 1C ^ at f ° r the above binar y number, the upper four bits correspond 
to the left hex character (4) and the lower four bits correspond to the right 


Nibble ASCUpattern Character 

0100 00110100 4 

1011 01000010 B 


Notice that we need to display the left character before the right 
characte ^Consequently, we must rotate the upper four bits to the lower 
position. The new upper bits are then zeroed. When this happens, the pattern 

0100 1101 


becomes 


1101 0100 

and then 


00000100 


We must be careful to save the original byte prior to the rotation and zeroing 
or the right nibble will be lost. g> 

Copy macro OUTHEX, shown in Figure 5.12, into your macro library 
This macro is used to convert a binary number to two hex characters that 
are printed on the console screen. If the optional parameter is omitted the 
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Figure 5.12: Macro OUTHEX to Display a Binary Byte in Hexadecimal 
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bi na ry nuinber in the accumulator is converted. If the binary number is 
locatin’" an ° ther rC81Ster ° r ' n memory> the P^meter references the 

d ‘ ffere , nt al !° rithms can be used to conv ert a four-bit nibble to an 
bas * c pr ° blem is ^ convert binary numbers from 
0 15 to the ASCII digits 0-9 and the ASCII letters A-F. We need to 
convert the binary numbers to their ASCII equivalent expressed in hexa¬ 
decimal notation, that is, to the base 16. 

• Let “ S StU , dy the bk patterns for the first ten numbers. The following list 
gives the values in decimal, binary, ASCII, and hex: 

Hex 

0 
1 
2 

3 

4 

5 

6 

7 

8 
9 

You can see from this list that there is a constant difference between these 
mary numbers and their ASCII counterparts. The ASCII zero has a 

30 het T V .i f K e J fr 3nd thC binary zero is °> leavin g a difference of 
30 hex. We call this difference the ASCII bias. Thus a binary number in 

ASCnb^If th^ ^ C .° nVerted t0 its ASCI1 equivalent by adding the 
ASCII bias. If the number is in the accumulator, the following instruc¬ 
tion makes the conversion: 

ADI 'O' 

differs, Val f gr ' aKr ' han 9 ’“"^-to-hex conversion is 
ditterent. The patterns for this group are as follows: 


Decimal 

Binary 

ASCII 

0 

0000 

0011 0000 

1 

0001 

0011 0001 

2 

0010 

0011 0010 

3 

0011 

0011 0011 

4 

0100 

0011 0100 

5 

0101 

0011 0101 

6 

0110 

0011 0110 

7 

0111 

0011 0111 

8 

1000 

0011 1000 

9 

1001 

0011 1001 


Decimal[ Binary ASCII 


10 

11 

12 

13 

14 

15 


1010 

1011 

1100 

1101 

1110 

1111 


01000001 
0100 0010 
01000011 
0100 0100 
0100 0101 
0100 0110 


Hex 

A 

B 

C 

D 

E 

F 

















152 MASTERING CP/M 


By studying this list, we can see that the offset between the binary ,md 
ASCII values is 37 hex. Thus, we can make the conversion by adding the 

offset of 37 hex to this second group of numbers. 

We perform the binary-to-hex conversion by first adding toe ASCII 
bias of 30 hex. We use the ADI ‘0’ instruction for this. 
was in the range 0-9, the result is the corresponding ASCH v alue from 
0-9 However, if the original nibble was in the range 10 -15, we add an 
additional 7, the remainder of the larger bias. This produces the corre- 
sDonding ASCII characters A - F. This additional amount is one less than 
the dffference between an ASCII A and an ASCII 9. Therefore we use the 
following instruction: 

ADI 'A'—'9' —1 ;make A —F 

The assembler determines that the operand has a value of 7. In this way, a 
binary two (0010) becomes the ASCII numeral 2. However, a binary ten 

tlOlO) becomes the ASCII letter A. , 

A shorter and faster algorithm is sometimes used for the binary-t - 
ASCII conversion, bu. I. is more difficult .0 follow. The instruct,ons 
from ADI ‘0’ to ADI ‘A’ -‘9’ -1 are replaced by the following. 


ADI 

DAA 

ACI 

DAA 


90H 

40H 


This approach uses the decimal adjust accumulator (DAA) °P e ™ tlon , 
The DAA command is designed for BCD arithmetic. After each add 
instruction, the DAA command is given. This operation adds 6 to eac 

nibble if the value is greater than 9. 

U, us consider this method of binary-to-ASCII hex conversion for a 

binary two and a binary ten (hexadecimal A): 

Binary Two Binary Ten 

Original value 0000 0010 00001010 

90 h ex 1001 0000 1001 0000 

ADI 10010010 1001 1010 

DAA 10010010 0000 0000 

40 hex 0100 0000 0100 0000 

ACI 1101 0010 0100 0001 

DAA 00110010 0100 0001 

ASCII value 2 A 

For the binary two, the first DAA operation does not change the value. 
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The se c °nd DAA instruction converts the 1101 of the left nibble to a 
by add ing the value of 6. The result is 32 hex, the ASCII numeral 2. 

to nnnrwwvf ^ bmary ten> the first DAA operation converts 1001 1010 
to 0000 0000 and sets the carry flag. The second DAA instruction does 
nothing. The result is 41 hex, the ASCII letter A. 

We will now develop a macro to determine the CP/M version number. 

A MACRO TO FIND THE CP/M VERSION NUMBER 

The original CP/M was given the version number 1.3. Subsequent ver¬ 
sions are labeled 1.4, 2.0,2.1,2.2, and so forth. Many CP/M programs 
^' run .° n ,f ver sions. However, several powerful features were in¬ 
troduced with version 2, and any program that uses these new features 

STf b o,r eCUted ° n versi ° n L In fact * we wil1 write a program in 
Chapter 8 that uses the built-in disk-parameter tables, and it will not run 

on version 1 for this reason. Programs that use the features of version 2 
should determine the version number of the CP/M they are running on 
and terminate if it is less than 2. 

The CP/M version number is obtained with BDOS function 12. For 

h! l a " d ab ° Ve ; the VCrsi0n number is mu,ti Plied by 10 and returned 

, the accum ulator and register L as a packed BCD number For 
example, version 2.2 is represented by the number 22 hex. A value of 
0 is returned for versions prior to 2.0. 

Macro CPMVER can be used to determine whether version 2.0 or later 
Ubraiy 8 USCd ' ThC maCr ° iS Sh ° Wn in FigUre 5 - 13 ’ Add k to your macro 


A PROGRAM TO DISPLAY THE IOBYTE VALUE 

In Chapter 3 we learned how to map the four logical devices— console 

the'lORYTF f !" d ' iS, - in, ° 16 Pl ’ ysi « l ^ Then we ineorpo^S 

it Sev '? BIOS r0 “ UneS - For «"”>*. by hanging 

th „.°, BYTE . to 1 we can send console output to the printer. 

wi~ d thatd,Sb r ble t0 Change the IO BYTE with the debugger, 
ith STAT, or with BASIC. However, it will be more convenient to 

c xec utable program to reading and changing the IOBYTE. 
We will develop the program in two parts. 

We begin with a program to determine the current IOBYTE value and 

display theCP/M deC ' mal * feature - "" proeram wi " *bo 

arer^ulre^ verslon number. Several ofthemacroswehave written 
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CPMVER AAACRO 


••(Put current date here) 


;;lnline macro to determine the CP/M version. 

“Accumulator has version in BCD times 10. 

; ;a = 22 for version 2.2, A = 0 for ver 1.4. 

PUSH 

H 

PUSH 

D 

PUSH 

B 

MVI 

C,12 

CALL 

BDOS 

MOV 

A,L ;;not necessary 

POP 

B 

POP 

D 

POP 

H 


;CPMVER 

ENDM 



Figure 5.13: Macro CPMVER to Determine the CP/M Version Number 


Make a copy of the program shown in Figure 5.14, giving it the name 
IOBYTE. Assemble it and execute it. The program will give the currem 
hex value of the IOBYTE and the CP/M version number. The program 
obtains the CP/M version number with macro CPMVER. The version 
number is obtained as a packed BCD number. However we use macro 
OUTHEX our binary-to-hexadecimal converter, to display the results. 

T™orfglnal value i saved in the C register. Macro UPPER moves the 
upper character to the lower position and zeros the upper^^rts-A 
logical OR with an ASCII zero converts the binary digit to ASCII so it can 
be printed by macro PCHAR. A decimal point is printed with PCHAR 
Then the original byte is retrieved from the C register and the lower 
character is similarly converted to ASCII and printed. 

Before completing our IOBYTE program we must add two more 

macros. 


A Macro to Read the Console Buffer 

Earlier in this chapter we considered two kinds of output routines. One 

type using BDOS function 2, displays individual characters one at a . 

Z alternative approach, using BDOS function 9, prints an entire buffer 
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TITLE Show IOBYTE and Version' 
;also show CP/M version 
/ 

;(Put current date here) 

/ 

; Usage: IOBYTE 


FALSE 

TRUE 

/ 

IOBYTE 

BOOT 

BDOS 

FCB1 

TPA 


EQU 

EQU 

EQU 

EQU 

EQU 

EQU 

EQU 


0 

NOT FALSE 

3 

0 

5 

5CH 

100H 


/system reboot 
;BDOS entry point 
/input FCB 

/transient program area 


/Set flags in main program so only one 
/copy of certain subroutines will be generated. 
/Place set lines before MACLIB call. 


COFLAG SET 
CXFLAG SET 
HXFLAG SET 
PRFLAG SET 
RCFLAG SET 
/end of flags 

FALSE 

FALSE 

FALSE 

FALSE 

FALSE 

/console output 
/binary to hex 
/hex to binary in HL 
/print console buffer 
/read console buffer 

/ 

AAACLIB 

CPMAAAC 


ORG 

TPA 



/ 

START: 

ENTER 




VERSN 

PRINT 

'(current date). IOBYTE 1' 

' IOBYTE is' 


MVI 

CALL 

OUTHEX 

C,7 

BDOS 

/get IOBYTE 


v!Zn Num7 amt ° DiSP,aytheIOBYTE Valueandthe CP/M 
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DONE: 

PRINT 

PRINT 

'hex' 

' for CP/M version ' 


CPMVER 

MOV 

C,A 

;save 


UPPER 

ORI 

'0' 

;move down 
;convert to decimal 


PCHAR 

PCHAR 

MOV 

ANI 

ORI 

PERIOD 

A,C 

0 FH 

'0' 

;left digit 

;convert to decimal 

/ 

PCHAR 

EXIT 

END 

START 

;right digit 


Figure 5.14 (continued) 


of characters at one time. Similarly, we can input console characters one 
at a time by using BDOS function 1, or we can read an entire line ot 

characters with BDOS function 10. 

Macro READCH can be used to read single characters. We will now 
use BDOS function 10 to develop a macro to input an entire line o 

characters from the console. ,. 

When console characters are read with function 10, they are placed into 
a memory region known as the console buffer. This buffer area must be 
established prior to making the BDOS call. Two auxihary bytes located 
immediately in front of the buffer, are associated with the buffer. The 
first of these two bytes defines the buffer length, the maximum number 
of characters it can hold. The second byte gives the actual number 

of characters present in the buffer. 

To use BDOS function 10, the DE register is loaded with the address ot 
the first auxiliary byte, register C gets the value of 10 and BDOS1 is ad ed. 
As each character is typed, CP/M places it in the buffer and also displays 
it on the console screen. The function terminates when a carriage return is 
entered or when the number of characters equals the maximum number 
specified by the first auxiliary byte. CP/M also sets the second auxiliary 
byte to the number of characters that were read. The following CP/M 
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control characters also can be used with this mode of data entry: 
Character^ Meaning 


E 

H 

I 

P 

R 

U 

X 


Begin new line 

Backspace 

Tab 

Engage/disengage printer 
Reprint line 
Cancel line 
Cancel line 


We will now develop macro READB, shown in Figure 5.15, to read the 
Sdo^Iu ;^The instructions at the beginning of the macro implement 
the BDOS call to fill the console buffer. The buffer itself is located at the 

RBUFMand RBUFC 8 ' Ven t * le * abelRB ^ ,F ‘^ eauxiI ' ar >' Mes are called 


RBUFM: DB RBUFE-RBUF ;maximum count 

RBUFC: DS 1 ;actual count 

RBUF: DS 16 ;buffer start 

RB *"* FF: /buffer end 


The DE register is loaded with the address of RBUFM, the location of 

w IHT m T bUffCr length - Notice that the assembler calculates this 
ength by subtracting the address of the buffer beginning (RBUF) from 

the address of the buffer end (RBUFE). When the buffer operation is 
completed and control returns to the calling program, the location RBUFC 


READB MACRO 
;;(Put current date here) 

"Inline macro to input a line from console. 

,,Buffer is located at end of macro. 

"Get characters from buffer by calling 
,;global subroutine GETCH in this macro. 

,,Buffer pointer RBUFP is also global. 

tt 

LOCAL AROUND, RBUFM, RBUF, RBUFC, RBUFE 

CALL RDB2? 

IF NOT RCFLAG 


Figure 5.15: Macro READB to Read the Console Buffer 















158 MASTERING CP/M 



JAAP 

AROUND 

RDB2?: 

PUSH 

H 


PUSH 

D 


PUSH 

B 


LXI 

D, RBUFM 


MVI 

C,10 


CALL 

BDOS 


LXI 

H,RBUFM + 2 


SHLD 

RBUFM-2 


POP 

B 


POP 

D 


POP 

H 


RET 


;global routine to get char from buffer 

GETCH: 

LDA 

RBUFC 


SUI 

1 


RC 



STA 

RBUFC 


PUSH 

H 


LHLD 

RBUFP 


MOV 

A,M 


INX 

H 


SHLD 

RBUFP 


POP 

H 


RET 


RCFLAG 

SET 

TRUE 

RBUFP: 

DW 

RBUF 

rconsole buffer address 

RBUFM: 

DB 

RBUFE-RBUF 

RBUFC: 

DS 

1 

RBUF: 

DS 

16 

RBUFE: 

ENDIF 


AROUND: 

ENDM 



;get count 
;decr with carry 
;no more char 


;get char 
;next 


;only one copy 

;buffer pointer 

;max length 
;actual length 
;buffer start 
;buffer end 

;;READB 


Figure 5.15 (continued) 
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contains the actual number of characters read during the input step. 

After a line of characters has been placed in the console buffer with 
BDOS function 10, it is necessary to get the characters from the buffer 
The middle portion of macro READB contains a separate global sub¬ 
routine called GETCH for this purpose. Each time subroutine GETCH is 
called, it returns with the next character in the accumulator. 

When subroutine GETCH takes a character from the buffer, it decre¬ 
ments the count of remaining characters stored at location RBUFC To 
make this task easier, a buffer pointer, RBUFP, is used. This pointer is set 
to the first character when the buffer is initially filled. Each time GETCH 
removes a character, it increments the pointer. 

The carry flag is reset each time GETCH returns a valid character. 
However, if there are no remaining characters when GETCH is called, the 
carry flag is set. Thus, it is important to check the carry flag immediately 
after a return from subroutine GETCH. The buffer pointer, RBUFP, is a 
global symbol. It can therefore be accessed by any other part of the pro- 
firam. Incorporate macro READB into your macro library. 

A Macro to Convert Hexadecimal to Binary 

Earlier in this chapter we considered a macro to convert a binary 
number to a hexadecimal number; we will now consider a complementary 
program to convert a hexadecimal number to a binary number. Macro 
HEXHL, shown in Figure 5.16, reads ASCII characters from the console 
buffer and converts them to a 16-bit binary number in the HL register. 
The characters must first be read, so macro READB must be referenced 
before macro HEXHL. This macro also requires macro UCASE. 

Macro HEXHL operates on a series of valid ASCII-coded hex numbers. 
A blank character or the end of the buffer normally terminates the opera¬ 
tion. If a nonhexadecimal character is encountered, the carry flag is set. 
Thus, you should check the state of the carry flag at the end of this step. 
Copy macro HEXHL into your macro library. 


HEXHL MACRO 

;;(Put current date here) 

-"Inline macro to convert ASCII hex characters 
/"in buffer to a 16-bit binary number in HL. 


^l U Z S dt^ C .ZuI XHL t0 Convert aStrin « °f ASCU Hex Characters to a 
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Character string is addressed by POINTR. 
Carry flag set if invalid hex character found. 
Macros needed: READB, UCASE 


LOCAL 

AROUND, RDHL2, NIB? 

CALL 

RDHL? 


/ / 

IF 

NOT HXFLAG 

;one copy only 

JMP 

AROUND 


RDHL?: 



LXI 

H,0 

;start with 0 

RDHL2: 



•get character from console buffer 


CALL 

GETCH 


CMC 



RNC 


;end of line 

UCASE 


;make uppercase 

CALL 

NIB? 

;to binary 

RC 


;error 

DAD 

H 

;times 2 

DAD 

H 

;times 4 

DAD 

H 

;times 8 

DAD 

H 

;times 16 

ORA 

L 

;combine new 

MOV 

L,A 

;put back 

JMP 

RDHL2 

;next 

;convert ASCII to binary 



NIB?: SUI 

'O' 

;ASCII bias 

RC 


;< 0 

CPI 

'F'-'O' + l 


CMC 



RC 


; > F 

CPI 

10 


CMC 



RNC 


;a number 0-9 

SUI 

'A' —'9' — 1 



Figure 5.16 (continued) 
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CPI 

10 



RET 



HXFLAG 

SET 

ENDIF 

TRUE 

;only one copy 

AROUND: 

ENDM 


;;HEXHL 


Figure 5.16 (continued) 


IOBYTE, Version 2 

The program we wrote previously can be used to display the current 
value of the IOBYTE at address 3. We will now add a new feature to this 
program—the ability to alter the value of the IOBYTE 
Make a copy of the first IOBYTE program (Figure 5.14) and alter it to 
look like Figure 5.17. Assemble the new version and execute it. If the pro¬ 
gram is executed as before, without a parameter on the command line, the 


TITLE 'IOBYTE: show or change' 
/also show CP/M version 


/ 

;(Put current date here) 


; Usage: 

/ 

IOBYTE 

IOBYTE CO 


/ 

.performs warm start to reset memory pointer 

FALSE 

TRUE 

EQU 0 

EQU NOT FALSE 


/ 

IOBYTE 

BOOT 

BDOS 

FCB1 

FCB2 

EQU 3 

EQU 0 

EQU 5 

EQU 5CH 

EQU 6CH 

;memory location 
;system reboot 
;BDOS entry point 
;input FCB 
;2nd parameter 


Figure 5.17: Program IOBYTE to Display and Change the IOBYTE 
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DBUFF EQU 80H ;default buffer 

Tpa EQU 100H transient program area 


Set flags in main program so only one 
copy of certain subroutines will be generated. 
Place set lines before MACLIB call. 


COFLAG 

SET 

FALSE 

;console output 

CXFLAG 

SET 

FALSE 

;binary to hex 

HXFLAG 

SET 

FALSE 

;hex to binary in HL 

PRFLAG 

SET 

FALSE 

;print console buffer 

RCFLAG 

SET 

FALSE 

;read console buffer 

;end of flags 



/ 

AAACLIB 

CPAAAAAC 


ORG 

TPA 



START: 





ENTER 




VERSN 

'(current date).IOBYTE ' 


LXI 

H,FCB1 +1 

parameter it any 


MOV 

A,M 

;first byte 


CPI 

BLANK 

;anything? 


JZ 

NOPAR 

;no 

•use FCB as buffer 




SHLD 

RBUFP 



LDA 

80H 

;buffer length 4* 1 


DCR 

A 

;skip the blank 


STA 

RBUFP+ 3 

;save the count 

AGAIN: 





HEXHL 


;hex to binary 


JC 

BADPAR 

;input error 


MOV 

E,L 



MVI 

C,8 

;set IOBYTE 


CALL 

BDOS 



JMP 

DONE 



Figure 5.17 (continued) 
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BADPAR: 





PRINT 

'Enter the hex value: ' 


READB 


;try again 


JMP 

AGAIN 


NOPAR: 





PRINT 

' IOBYTE is' 



MVI 

C ,7 

;get IOBYTE 


CALL 

BDOS 



OUTHEX 




PRINT 

' hex' 


DONE: 





PRINT 

' for CP/M version ' 


CPMVER 




MOV 

C,A 

;save 


UPPER 


;move down 


ORI 

'O' 

;convert to binary 


PCHAR 


; 1 eft digit 


PCHAR 

PERIOD 



MOV 

A,C 



ANI 

OFH 



ORI 

'0' 

/convert to decimal 


PCHAR 


/right digit 


EXIT 

BOOT 

/warm start 


END 

START 



Figure 5.17 (continued) 


current value of the IOBYTE and the CP/M version will be displayed. 
Alternatively, if a valid hexadecimal character is given as a parameter, the 
IOBYTE is changed to the desired value. Finally, if an invalid hexa¬ 
decimal number is entered, the value is requested again. 

If your BIOS incorporates the IOBYTE feature, you can test the new 
version of this program. (Adding the IOBYTE feature to BIOS is described 
in Chapter 3.) Suppose, for example, that the current value of the 
IOBYTE is 0 and a value of 1 sends console output to the printer. Change 
the IOBYTE to 1 with the command 

IOBYTE 1 

Console output should now appear at the printer. To return to the 








164 MASTERING CP/M 


previous state, give the command 
IOBYTE 0 

The program begins with macros ENTER and VERSN. Then a check is 
made to see if a parameter was included on the command line. CP/M 
places the first parameter, if present, in the first file control block (FCB1) 
starting at 5C hex. If there is no disk-drive parameter, as in the present 
application, the byte at 5C hex is automatically zeroed. The parameter 
then begins at the next location, 5D hex. If no parameter was entered on 
the command line, there will be a blank at location 5D hex (FCB14-1). 
The program then prints the current value of the IOBYTE and the CP/M 

version. , 

If a parameter was entered on the command line, then the byte a 
FCB1 +1 will not be blank. The next step is to convert the one or two 
ASCII characters to a binary number and store the result in the IOBYTE 
location at address 3. Macro HEXHL is used for this purpose. Re¬ 
member, however, that this macro was written to obtain its characters 
from the console buffer. Therefore, we set the console buffer pointer 
(RBUFP) to the beginning of the file control block (FCB1 +1). 

We also need to set the number of characters in the buffer. This is ob¬ 
tained from the default console buffer at 80 hex. The first parameter 
begins at address 82 hex, and the number of characters that was entered 
appears at address 80 hex. This count is actually one character too large, 
because it includes the space in front of the parameter. Consequently, the 
following instructions get the character count, decrease it by one to account 
for the blank, and store the value in our console buffer at location RBUFC: 


LDA 

80H 

;buffer length + 1 

DCR 

A 

;skip the blank 

STA 

RBUFP+ 3 

;save the count 


Macro HEXHL is now executed to convert the parameter to a binary 
number. If an invalid hexadecimal character is encountered, a new value 
is requested from the user. In this case, macro READB is called to get the 
desired value. We will now use macro HEXHL in another program to 
branch to an arbitrary memory location. 


A PROGRAM TO GO TO ANY ADDRESS IN MEMORY 

A program can be executed under CP/M by typing its name and any 
parameters. The CP/M system copies the executable image from disk into 
memory starting at the TPA (address 100 hex). CP/M then branches to 
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address 100 hex to start the program. Sometimes, however, we may need 
to go to an address other than 100 hex. For example, there may be a boot¬ 
strap loader or a monitor at a high memory location. Suppose that we 
have two different versions of BIOS, each one saved on a different system 
disk. We could change from one system to another simply by changing the 
diskette and branching to the bootstrap loader. We can execute the 
debugger DDT or SID in this case, using the debugger G command to 
force a branch to the desired address. 

Alternatively, the program shown in Figure 5.18 can be used to branch 


TITLE 

'GO anywhere in memory' 


;(Put current date here) 


/ 

; Usage: 

GO 

(address) 


/ 

GO 



/ 

* (address) 


;macro 1 

ibrary for CP/M system calls 

/ 

FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


! 

BOOT 

EQU 

0 

;system reboot 

BDOS 

EQU 

5 

;BDOS entry point 

FCB1 

EQU 

5CH 

;input FCB 

FCB2 

EQU 

6CH 

;2nd parameter 

DBUFF 

EQU 

80H 

;default buffer 

TPA 

EQU 

100H 

/transient program area 

;Set flags in main 

program so only one 

;copy of certain subroutines will be generated. 

;Place set lines before AAACLIB call. 


/ 

COFLAG 

SET 

FALSE 

/console output 

HXFLAG 

SET 

FALSE 

/hex to binary in HL 

PRFLAG 

SET 

FALSE 

/print console buffer 


Figure 5.18: Program GO to Branch Anywhere in Memory 
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RCFLAG 

SET 

FALSE ;read console buffer 

;end of flags 



/ 

AAACLIB 

CPAAAAAC 


/ 

ORG 

TPA 



/ 

START: 





VERSN 

'(current date).GO' 


LXI 

H,FCB1 +1 

parameter if any 


MOV 

A,M 

first byte 


CPI 

BLANK 

anything? 


JZ 

NOPAR 

no 

;use FCB 

as buffer 




SHLD 

RBUFP 

save pointer 


LDA 

80H 

console buffer length -f 1 


DCR 

A 

skip the blank 


STA 

RBUFP + 3 

save the count 

AGAIN: 

HEXHL 


hex to binary 


JC 

NOPAR 

input error 


PCHL 


go to address 

;improper parameter, try again 


NOPAR: 





PRINT 

'Enter the hex address: ' 


READB 


;input console line 


JAAP 

AGAIN 

;try again 

/ 

END 

START 



Figure 5.18 (continued) 


to any memory address. The desired hexadecimal address can be given on 
the command line, or it can be given after the program has started. For 
example, the command 

GO E800 

will cause a branch to the address E800 hex. 
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This program is very similar to IOBYTE version 2. Macros VERSN, 
HEXHL, READB, and PRINT are required. Notice that we did not save 
the incoming stack pointer in this program. 

Create a file named GO. Type in the program, assemble it, and run it. If 
you have a monitor in memory, branch to it with the GO command. Even 
if you have nowhere else to go, you can test the program. Give the com¬ 
mand of GO without a parameter. When the program requests an address 
give a value of 0. This will cause CP/M to perform a warm start. 


A PROGRAM TO EJECT PAGES ON THE PRINTER 

The last program in this chapter will allow us to eject one or more pages 
on the printer. We will need a new macro, called LCHAR, for this program. 
Macro LCHAR performs the same task on the printer that macro PCHAR 
does on the console. In fact, it would be relatively easy to combine the two 
macros into one, but referencing the combination macro would then be 
more complicated. Consequently, we will keep the two separate 

Place a copy of macro LCHAR (Figure 5.19) in your macro library. 

e easiest way to do this may be to make a duplicate of macro PCHAR 
Then change every occurrence of the three letters PCH to LCH on the 
copy. Also, change the first parameter in the reference to macro SYSF 
from the value of 2 to the value of 5. 

Create a file named PAGE. Type in the program shown in Figure 5.20 
and assemble it. The program begins with macros ENTER and VERSN. 
Then the file control block is tested to see if a parameter was entered on 
the command line. This time, however, we use the command 

IDA FCB1+1 

for this purpose. If this location is blank, no parameter was entered and 
one page will be ejected. If a parameter was included in the command it is 
used to determine how many pages are ejected. To avoid getting too many 
pages, only the lower three bits of the input value are used. This allows a 
maximum of seven pages to be ejected. 

There are two loops in the main part of the program. The outer loop 
counts the number of pages. The inner loop counts the number of lines. 
Macro LCHAR is used to send line feeds to the printer. This program is 
very simple, but it demonstrates several important features. For example 
in previous programs we checked the location 5D hex (FCB + 1) to see 
whether a file name was given as a parameter on the command line In this 
program, however, we expect the parameter to be a decimal number. 
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LCHAR AAACRO 

PAR 


••(Put current date here) 

;;lnline macro to send one char to list. 


;;Optional PAR is loaded into A. 


;;AAacro needed: SYSF 

;; Usage: LCHAR 



LCHAR 

CR 


LCHAR 

LOCAL 

AROUND 


IF 

NOT NUL PAR 


MVI 

A, PAR 


ENDIF 

CALL 

LCH2? 


IF 

NOT LOFLAG 


JAAP 

AROUND 


LCH2?: SYSF 

5, AE 

;list char 

LOFLAG SET 

TRUE 


ENDIF 

AROUND: 


;;LCHAR 

ENDM 


Figure 5.19: Macro LCHAR to Print Characters on the Printer 



Figure 5.20: Program PAGE to Eject Pages on the Printer 
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Figure 5.20 (continued) 
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SUMMARY 

We began our macro library in Chapter 4 with several general-purpose 
routines. In this chapter we have added macros that interact with the 
peripherals through the CP/M BDOS. These include macros “ wn *' 
characters on the console, read characters from the console rad and 
write the console buffer, and make base conversions. We wrote four ex¬ 
ecutable programs, primarily to learn more about how CP/M is organized. 
Of course, these programs are useful in their own right. 

The directory of your macro library should now look like this: 


;;Macros in 

;;AMBIG 

;;COMPAR 

;;COMPRA 

;;CPMVER 

;;CRLF 

;;ENTER 

;;EXIT 

;;FHL 

;;HEXHL 

;;LCHAR 

;;AAOVE 

;;OUTHEX 

;;PCHAR 

;;PRINT 

;;READB 

;;READCH 

;;SBC 

;;SYSF 

;;UCASE 

;;UPPER 

;;VERSN 


this library 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 
AAACRO 


OLD, NEW 

FIRST, SECOND, BYTES 
FIRST, SECOND, BYTES 


SPACE? 

ADDR, BYTES, CHAR 

POINTR 

PAR 

FROAA, TO, BYTES 

REG 

PAR 

TEXT, BYTES 

BUFFR 

REG 

FUNC, AE 
REG 
REG 
NUAA 


Flags 
(none) 

CAAFLAG 

CAAFLAG 

(none) 

CRFLAG, COFLAG 
(none) 

(none) 

FLFLAG 

HXFLAG, RCFLAG 

LOFLAG 

AAVFLAG 

CXFLAG, COFLAG 
COFLAG 

PRFLAG, COFLAG 
RCFLAG 

CIFLAG, COFLAG 
(none) 

(none) 

(none) 

(none) 

(none) 























































































INTRODUCTION 

r p/^ apte " 5 we developed macros and programs for performing 
CP/M operations using BDOS calls. However, we did not considerTk 
operations. In this chapter we will expand our capabite "otclude 

beei^h fi eS ' We WlU ,earn how to write disk files Chapter 7 We 
begin by summarizing the organization of the disk and the way CP/M 

KSSES °; * Th '“ " «* several important 

tor disk operations. To demonstrate the use of these macros we will write 

DUMp e tn^ Uta . e P ^ rams: SHOW to display ASCII files ok the console 
DUMP to display a COM disk file in ASCII and hexadecimal ADDRESS 

-——* - pair = 


THE FILE CONTROL BLOCK 


T. he .^ 1S ^ surface ,s Partitioned into concentric tracks, which are further 
subdivided into sectors. The disk hardware is able to address th"e sSors 





















































































individually. However, CP/M accesses ^ r unitcalled ab/ocL A 
cinale-densitv disk has a block size of 1024 (IK) or 2048 (2K) y 
Double-density disks have a block size of 2K, 4K, 8K or 16K bytes- ere 

are 128 bytes of information on each sector. Therefore, a IK block con 
tains 8 sectors and a 2K block contains 16 sectors. 

Each file on a CP/M disk is described by a 32-byte file control b oc 
(FCB) that is written into the disk directory. The first 16 bytes of the FCB 
^vetfiename of the file, its length, and other cki^actcristics. 
fng 16 bytes of the FCB specify the disk location of each block contai 

” Beforea disk file can be accessed, a second copy of the FCB must be 
created in memory. As the disk file is altered, the memory version of the 
FCB changes At the end of a write operation, the disk version of the FCB 
S^datedfrom the memory version. Wemust be a“e.od.snwnsh 
the two versions of the FCB, because they are sometimes different. 
Unfortunately, there is no standard terminology forr 
However in this book we will use the expressions memory p CB and disK 
?CB when this distinction is necessary. We will use the unquahfted ex- 
nression FCB when both versions are the same. 

P More we look at the details of the FCB, let us review bmary c^n«. 
Data are written onto the disk as a sequence of binary digits (0 or 1), 
fust as in memory. As we saw in Chapter 5, information » 
sometimes in regular binary form and other times in ASCII. For example, 
rS"for a binary five and an ASCII five are as follows: 


Binary Five 

00000101 


ASCHFive 
0011 0101 


Some of the bytes of the FCB are coded in regulai binary; other bytes 
are in ASCII We generally express regular binary numbers in hexa- 
Simaftem Thus a binary three would be shown as 03. We couldl rdso 
eroress the ASCII characters in hexadecimal form, but ,t ,s more useful to 
show them in ASCII. Therefore, an ASCII three is shown as 3 rather than 

* K \^novftunt tothe details of die FCB. The first byte 

binary number from 0-10 hex. Drives A, B, and C correspond to va 

of i 2 and 3. The maximum allowable value is 10 hex, correspon i g 

drive P A value of 0 in this first position refers to the default or currently 
logged-in drive. The next eight bytes of the FCB (bytes 1 ) con ai 

file name in ASCII. This field is filled out with blanks if necessary. 











file name extension is stored in the next three bytes (bytes 9- 11) This is 
™ field that is used t0 describe the nature of the file We have 

files BAKfofba S r ^ ^ BASIC fi,es > FOR for FORTRAN 

blanks ^eLrt ’ “ d S ° ^ ™ S fie,d is also " with 

all fhi Wo 11 ? 7T m ° re th3n ° ne FCB for the com Plete specification of 
all the blocks. In this case there will be more than one FCB with the same 

The n n me h The "I* bytC ° 2) distin § uishes FCBs with the same file name 
files Th^ m thls positlon ls called ‘he extent. It will be zero for small 

the FCB't W ° 5 *“ " 0t COnCem US - The ,ast b y £e in th is half of 

the FCB (15) gives the number of records (128-byte sectors) in the FCB 

tms onTh'S 16 ^ ° f ‘ he FCB SiVe lh ' l0Ca,i ° n ° f each bl °<* »f 

Five sample disk FCBs are shown in Figure 6 1 RpmpmU • c 

is actually present as a seance oE'howXS CTe 
file « arc shown in ASCII, while the other informationis 

darky"'"' n0ta “ 0n ' Thr “ C °'“ n ’" S ° f spa “ have also added for 


So K 2e S x ononnnnr ° 2 °^? 50607 °809 oaobocoooooooooo 

00 SORT COM 00000080 

r c °" 01000080 22232425262728292A2B2C202E2F3031 

COM 0200000A 32330000000000000000000000000000 


00 SORT 
00 SORT 


Figure 6.1: Five File Control Blocks for Three Files 


we^! init j a i bytC ° f CaCh Cntry is zero - indicating that all of these files 
were saved by user zero. The first file, CPMIO.ASM, contains 55 85 
decimal) records and is found on blocks 02 -OC* Th^ n t 

The°,h Hi T 00 WOTds a " d " eScly SSL D 

The third, fourth, and fifth entries in th~ r ' 

SORT COM; they all refer to the same file eJ of £TtmZs h^Trhe 

FCBis no^fr 1113 dlfferent extent number. The file is so large that one 
CB is not sufficient to describe it. The first 80 records (blocks 12-211 

ascorid" extent m°clc s 22 31 are referenced by the 

■*£5S**2tSSSS? “ «““*■ 32 »" d 33 > - 

Later in this chapter we will write macros to activate and read disk files 
However we must consider the possibility of a misspelled ffle name We 
will therefore add a macro to handle error messages 











A MACRO TO DISPLAY AN ERROR MESSAGE 
AND ABORT THE PROGRAM 

Each time a program requests data from the console, a check should be 
made to see that the information is meaningful. An error message shou 
be given inUs ^t. For example, suppose that an alphabetic char ts 
given when a decimal number is needed. The operator should be informed 

° f ThlreTs^second matter we must consider. The statements of a com- 
putCT^rogram are normally executed in order. However, when an 
^covered we will want to execute an alternate set of instructions and 
perhaps temiinate the program. Let us combine these two ideas-displaying 
^ erSr ^sage and"branching to an alternate location-into a macro 

03 We previously wrote macro PRINT to send messages to the: console^ 
We will reference macro PRINT to display the error message. (We have 
seen that one macro can reference another.) Then we mil braid.t tojour 

alternate locatiomM^ro^RRORldugivenm referenced within in ^ 

m Tlus mao ha'lwo parameters. The first parameter is thetext of'theerror 
message^The second" parameter is the branch address after the error 

message is printed. Ifthis parameter is omitted from the macroreferenee, 

a warm start is performed by a branch to the address ofBOOT^ 

Notice that the parameter in the reference to macoPRINT is^ncos 
in n nale brackets. This construction is necessary if the first parameter to 
ERRORM is enclosed in angle brackets. The macro assemb e ” e ^® s 
one set of angle brackets each time a macro is expanded Thus, one pair ot 
brackets is removed when macro ERRORM is expanded and a second pan 
of bISTmmoved when macro PRINT is expanded. The angfe 
brackets are necessary because commas are somet.mes used in the text^ f 
the parameter as well as in separating one parameter from pother The 
assembler interprets commas as parameter separators unless they 
within angle brackets. For example, the expression 
ERRORM <CR,LF,'?File exists'> 
contains only one parameter. However, the expression 
ERRORM CR,LF/?File exists' 

^Nowthatwehavereviewed the fundamentals of CP/M file organization 

andwrittenamaero to display error messages, we can learn howtoaecess 

an existing disk file. 




ERRORM AAACRO TEXT, WHERE 
;;(Puf current date here) 

;;Macro to print message on console. 

;;Message is enclosed in apostrophes. 

Optional second parameter has branch address. 

no second parameter, go to BOOT. 

Macros needed: PRINT, CRLF 


Usage: 


ERRORM 

'Message' 


CRLF 

PRINT 

<TEXT> 


IF 

NUL WHERE 


JMP 

ELSE 

BOOT 

;quit 

JMP 

WHERE 


ENDIF 

ENDM 


;;ERRORM 


DkpU,y m w 


OPENING AN EXISTING DISK FILE 

follows: hCB ' The necessary information is as 

Byte Data 


0 

1-8 

9-11 

12 

32 


Disk drive number 
File name 

File name extension 
Extent (set to zero) 

Record number (set to zero) 

number^ positToiTo^Th? 31 ! 16 ’' 11131 ^ mem ° ry FCB contains the drive 
umner at position 0. The value is set to 0 for the default drive 1 for driv^ 

A, 2 for dnve B, and so on. The file name and extension arepia^dindie 












next 11 bvtes - they have the usual ASCII form. The extent byte at position 
n fa IXzlro If the usual sequential access is desired, the record 

n °U will u^aUy benec^sm ^oprovide allof the^bove information each 
time we open an existing disk file. Consequendy we will want to » wnte a 
macro to make this task easier. But before we do this, let us 
CP/M can help us construct the memory FCB. 


Constructing a Memory FCB with CP/M 

When a program is execKd 

FCB for the first parameter, tncludmg the dtsk dnve, t e , d 

tvne (bvtes 0-11). The FCB is located at address 5C hex. If a second 
p^ameteds given on the command line, CP/M also begins a second FCB 

81 We can use DDT or SID to see how CP/M sets up the memory FCB. We 

debugger is executed with a parameter, it will attempt to access the 
auestTd file However, if the debugger finds the requested file, it will he 
kiaded into memory and the FCB will be deleted. Therefore, you must us 

a nonexistent disk file for this example. 

Suppose that DDT is located on drive A. Go to drive B and give 

command 

A:DDT FIRST.EXT 


or 


A:SID FIRST.EXT 






reading disk files with bdos 


memory with the command 
D50,8F 

The following display should appear: 


0060 53 sa ?n ™ on 00 00 00 00 00 00 °0 00 46 49 52 CTD 

SSI S 0 ° 0 ° 0 ° 0 ° s °° s 0 °°° °°° 8 8 

0A 20 46 49 52 53 54 2E 45 58 54 00 00 00 00 00 . FIRSt/exY.:". 
Remember, the debugger display has three parts. The first number nn 

of theTorrespondhn^mmorye^reM^^lwxadwtaad 8 ^^^^!!^^ 

Look at the last line in the display. From the ASrit *• 

can see that the command tail FIRST EXT hath i ^ j . a ^°n, we 

buffer at 89 hev Th 7 T’ ,, 1 • EXT ’ has been P laced in the console 

driv”,rr'vl?„S «hi 5C h “', Th V fet designates the disk 
has been selected The l e nlme RR^' a,i " 8 the def “ 1 ' drive 

parent in^the^consoleTufferl^u't'does notapp^^nth^rcit ^TOe ffle 

v,ous ■» 

A: DDT B .FIRST. EXT 
or 

A:SID BrFIRST.EXT 

^Ssaassats 

D50,8F 

In the resulting display, the command tail starting at address 82 hex shows 














that drive B was specifically requested: 


0050 00 00 00 00 00 00 00 00 00 00 00 00 02 46 49 52 

E S 2 S 2 46 49 5° 53 2 2 2 2 2 °oS °o°o 2 . b : fir «: s ;::: 

S^of the memory FCB at address 5C hex to have a value of 2. 

A Macro to Open a Disk File 

The Drevious examples demonstrate that CP/M can construct a 
memory FCB if the file name is given as a parameter on the co ®“ d l " e d 
In order to access the file, we must still zero the We am»he rec 

number byte, and then we must open the file with BDOS functio • 
After the return from BDOS, the accumulator contains the value of F 
h^if the requested file could not be found. We must be ready to either 
continue with the program or display an error message and terminate e 

Pr WeMl’l now write a macro to construct a memory FCB and call BDOS 

function 15. Add macro OPEN (shown in Figure 6.3) to your library and 

dace the name in the directory at the beginning. 

Let us look at the details of macro OPEN. The first opcode loads DE 

with the FCB address: 

LXI D,POINTR 

The svmbol POINTR is a dummy parameter. The corresponding 

OPEN2?\rthen called to perform BDOS function 15. After returning 
from BDOS, the accumulator contains FF hex if the fde cou no^e 

nnened The next instruction increments the accumulator. 

thezero flagif the file was opened. The program .hen branches to the local 
label AROUND and continues. However, if the file could no e , 

error message 

?No source file 






POINTR, WHERE 


OPEN MACRO 

;;(Put current date Here) 

;;lnline macro to open an existing disk file. 

;;POINTR refers to file control block. 

;;Extent and current record number are zeroed 
;;Branch to location WHERE if file not found or 
;;print error message and branch to DONE otherwise 
;/Macros needed: SYSF, ERRORM 


OPEN2?: 

OPFLAG 

AROUND: 


ENDM 


Figure 6.3: Macro OPEN to Open a Disk File 


AROUND 

D, POINTR 

A 

;zero 

POINTR+12 

/extent 

POINTR+32 

/current record 

OPEN2? 

A 

/0=ok, FF means 

AROUND 

NUL WHERE 

'No source file', DONE 

WHERE 

NOT OPFLAG 
15 

/open disk file 

TRUE 

/only one copy 


//OPEN 


a »d ta ‘erminatt the program with a branch to the global label DONE 

aSSSE-asaS 


CONT2: 


OPEN 

ERRORM 


FCB1, CONT2 
'?File name exists' 


In this case, FCB1 refers to the memory FCB. However, the expression IF 
















NUL WHERE is false, so macro ERRORM Isi omittedfJTS 

r>f macro OPEN. The program branches to the label CONT 

not found. If the file is located, an error message is printed and the program 

iS wriest create three additional macros to facilitate disk operation 
before w7can write the next program. One will set the location of he 
memory buffer for reading a disk file, the second will actually read the 
file, and the third will request a file name and then create a memory 
We begin with macro SETDMA. 

A MACRO TO SET THE DMA ADDRESS 

RDOS function 20 is used to read a sector (128 bytes) from disk to 
mrnory We »w previously that a IK or larger block of se«ors is the 
smaUest amount of information that CP/M can read from a disk. How¬ 
ever when a sector is requested, CP/M finds the block in which « , 
Erf and copies the desired sector to a 128-byte seaor buffer. The 
memory location of the sector buffer is called the DMA (disk memory ac- 

"I'ach fime'a warm start occurs, the DMA address is automatically reset 
to 80 hex. However, this will not always be aconvement location. We 
earlier in this chapter that CP/M places the console buffer at 80 hex, and 
S debu^a 3) Places its stack in this region as well. Furthermore 
we wSierimes want to read an entire disk file into memorystarting at 
100 hex In that case we will want the DMA address to be 100 hex for the 
fustS" 180 hexforthe second sector, M 0 hex for the third seefor, and 
so forth Therefore, we must be able to alter the DMA address. We y 
also want to reset the DMA address to 80 hex, in case the previous program 

^UartuffiTOMA given in Figure 6.4, uses BDOS function 26to set the 

DMA^ddress^Th^macro reference will usually give the DM A address as 

a m Which case the assembler loads the DE 

parameter However, sometimes it will be more convenient to load the DE 
register from a memory location prior to the macro reference in which 
case the parameter will be omitted. Copy the macro into your library. 
Let us now construct a macro to read a disk sector. 

A MACRO TO READ ONE DISK SECTOR 

Before a disk file can be read, it is necessary to construct a memory FCB 

comSSe file name and open the file with BDOS function 15. It may 




SETDMA AAACRO POINTR 
;;(Put current date here) 

;;lnline macro to set the DMA address where 
;;next sector will be read or written. 

;;Macro needed: SYSF 


DMA2?: 

DMFLAG 

AROUND: 


LOCAL 

IF 

LXI 

ENDIF 

CALL 

IF 

JMP 

SYSF 

SET 

ENDIF 

ENDM 


AROUND 
NOT NUL POINTR 
D, POINTR 

DAAA2? 

NOT DMFLAG 
AROUND 

26 

TRUE 


;set DAAA address 
;only one copy 

;;SETDMA 


Figure 6.4: Macro SETDMA to Set the DMA Address 


,0 “* ? MA addreSS wi,h BDOS 26- At this 

point a 128-byte sector can be read from the disk using BDOS function 20 

We SdsT 017 DMA address.' 

read a dish 

Mo'yFC^Thea '"“m' 7 1 * parameter is the address of the 
y . The assembler loads this address into the DE resister ifth* 

.£££%££^'™'^~or yFCBatt ' r 














READS 

AAACRO 

POINTR, STAR 


••(Put current date here) 



-Inline macro 

to read a disk sector. 


;;POINTR refers to file control block. 


•Optional second parameter is symbol 


••to be printed after sector 

is read. 


"Zero flag is reset if end of file. 


"Macros needed: SYSF, PCHAR 


// 

;; Usage: 

READS 

FCBl 


// 

READS 

FCBS, '*' 


/ r 

LOCAL 

AROUND 



IF 

not nul STAR 



PCHAR 

STAR 

;to console 


ENDIF 




IF 

NOT NUL POINTR 


LXI 

D, POINTR 



ENDIF 




CALL 

READ2? 



ORA 

A 

;set flags 


IF 

NOT RDFLAG 



JAAP 

AROUND 


READ2?: 

SYSF 

20 

;read disk sector 

RDFLAG 

SET 

TRUE 

;only one copy 


ENDIF 


• DC A HQ 

AROUND: 



"RtADo 


ENDAA 




Figure 6.5: Macro READS to Read a Disk File into Memory 


A MACRO TO INPUT A FILE NAME 

We saw at the beginning of this chapter that a file name entered as 
by 1, drive B is 2, and so on. CP/M also raises any lowercase letters to 
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/ 

;Set flags in main program so only 

one 

;copy of certain subroutines will be generated. 

;Place set lines before AAACLIB call. 


Cl FLAG 

SET 

FALSE 

;input console char 

COFLAG 

SET 

FALSE 

/output console char 

CRFLAG 

SET 

FALSE 

/carr-ret/line-feed 

CXFLAG 

SET 

FALSE 

/binary in C to hex 

DMFLAG 

SET 

FALSE 

/set DAAA 

FLFLAG 

SET 

FALSE 

/fill characters 

FNFLAG 

SET 

FALSE 

/read file name 

GTFLAG 

SET 

FALSE 

/get char from buffer 

OPFLAG 

SET 

FALSE 

/open disk file 

PRFLAG 

SET 

FALSE 

/print console buffer 

RCFLAG 

SET 

FALSE 

/read console buffer 

RDFLAG 

SET 

FALSE 

/read disk sector 

;end of flags 



/ 

AAACLIB 

CPAAAAAC 


/ 

ORG 

100H 



/ 

START: 

ENTER 




VERSN 

'(current date).DUAAP' 


LDA 

FCB1 +1 



CPI 

BLANK 

/file name? 


JNZ 

OP3 

/yes 


GFNAME 

FCB1 

/get file name 

OP3: 




OPEN 

FCB1 

/input disk file 


SETDMA 

DBUFF 

/sector location 


LXI 

H,TPA 

/display pointer 


SHLD 

PNTR 



PRINT 

'Space bar for next screen, ' 


PRINT 

'<CR> next line, <ESC> to abort' 

NEWLN: 



/start new line 


Figure 6.9 (continued) 
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CRLF 




PUSH 

H 

;buffer pointer 


LHLD 

PNTR 

;display pointer 


OUTHEX 

H 

;show address 


OUTHEX 

L 



LXI 

D,10H 

;next line 


DAD 

D 



SHLD 

PNTR 

;save 


POP 

H 

;buffer pointer 


PCHAR 

BLANK 


NEXT: 

MOV 

A,H 

;check pointer 


ORA 

A 

;still 80-FF hex? 


JZ 

NEXT2 

;yes 


READS 

FCB1 

;read a sector 


JNZ 

DONE 

;end of file 


LXI 

H,DBUFF 


NEXT2: 

OUTHEX 

M 



INX 

H 



MOV 

A,L 



ANI 

OFH 

;line end? 


JZ 

PASC 

;yes 


ANI 

3 

;space 


JNZ 

NEXT 

;no 


PCHAR 

BLANK 



JMP 

NEXT 


PASC: 

PRINT 

/ / 

;ASCII dump 


PUSH 

H 

;buffer pointer 


LXI 

D, — 1 OH 



DAD 

D 

;back up pointer 

PAS2: 

MOV 

A,M 



INX 

H 



CPI 

7FH 

;high bit on? 


JNC 

PAS3 

;yes 


CPI 

BLANK 

;control char? 


Figure 6.9 (continued) 
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uppercase, fills out the file name and file type with blanks, and removes 
the decimal point in the file name. 

However, once a program has begun execution, CP/M cannot convert 
a file name into an FCB. Many of the programs we will write in this book 
expect a file name to be entered. If the parameter is given on the command 
line, CP/M creates the necessary memory FCB. However, if the file name 
was not given on the command line, the program must request one. The 
program itself must now process the characters that are entered. That is, 
byte 0 of the FCB must be set to 0 if no drive was specified, or set to 1 if 
drive A was specified. Lowercase letters must be converted to uppercase, 
and so forth. 

The macro GFNAME, shown in Figure 6.6, asks for a file name and 
then sets up a memory FCB. The instructions it generates will only be used 
after a program has begun execution. Copy the macro into your library. 
The memory FCB is referenced through the parameter. This will usually 
be 5C hex, but we will sometimes use another address. The file name may 
be entered in either uppercase or lowercase letters. A disk drive also may 
be specified if desired. 

We will now use the macros we have created to write a program to 
display ASCII files on the console. 


GFNAME MACRO 

FCB 

;;(Put current date here) 

"Inline macro to get file name from console 

;;and place in FCB. Lowercase raised to uppercase. 

"Macros needed: READB, FILL, UCASE, PRINT, CRLF 

"Subroutine GETCH is 

part of macro READB. 

// 

LOCAL 

AROUND, PNAME,ENAME,EXTEN,GNAM2 

PUSH 

H 

PUSH 

D 

PUSH 

B 

LXI 

H,FCB 

SHLD 

FCBS? 

CALL 

GNAM? 

POP 

B 


Figure 6.6: Macro GFNAME to Input a File Name after a Program 
Has Begun Executing 
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POP 

POP 

IF 

JMP 

FCBS?: DS 

GNAM?: 

CRLF 

GNAM2: 

PRINT 

PRINT 

LHLD 

XRA 

MOV 

I NX 

FILL 

XCHG 

READB 

CALL 

JC 

CPI 

JZ 

UCASE 

STAX 

CALL 

RC 

CPI 

RZ 

MVI 

UCASE 

CPI 

JZ 

CPI 

JNZ 

LDAX 

SUI 

STAX 

CALL 

JC 


D 

H 

NOT FNFLAG 
AROUND 
2 


< 

'Enter file name: 
FCBS? 

A 

M,A 

H 

, 11, BLANK 


GETCH 

GNAM2 

BLANK 

GNAM2 

D 

GETCH 

BLANK 

B,7 

PERIOD 

ENAME 

/./ 

PNAME 

D 

'A'-l 

D 

GETCH 

GNAM2 


;save orig pointer 


',CR> 


;zero 

;default drive 


;console buffer 
;first char 
;try again 

;try again 

;maybe first 
;second char 
;short name 

;ditto 

;name length-1 


;drive? 

;no 

;get drive 
;make binary 
;put it 

;start file name 
;drive only 


Figure 6.6 (continued) 
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UCASE 

INR 

B 



DCX 

D 


PNAME: 

INX 

D 

/primary name 


STAX 

D 



CALL 

GETCH 



RC 




CPI 

BLANK 



RZ 

UCASE 

CPI 

PERIOD 



JZ 

ENAME 



DCR 

B 



JNZ 

PNAME 

;ok 


JMP 

GNAM2 

;if 9 char 

ENAME: 

LHLD 

FCBS? 

;get FCB 


LXI 

D,9 

;ext offset 


DAD 

D 



XCHG 

MVI 

B,3 


EXTEN: 

CALL 

GETCH 

/file name extension 


RC 




CPI 

BLANK 



RZ 

UCASE 

STAX 

D 



INX 

D 



DCR 

B 



JNZ 

EXTEN 



RET 


/done 

/ 

FNFLAG 

SET 

ENDIF 

TRUE 


AROUND: 

ENDM 


//GFNAAAE 


Figure 6.6 (continued) 
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DISPLAYING AN ASCII FILE ON THE CONSOLE 

We have seen that information is stored on disk and in memory as a se¬ 
quence of bits. However, there are several different coding schemes. 
Source files are coded entirely in ASCII. Executable files are primarily 
binary with messages in ASCII. The distinction is important if we want to 
look at a file. An ASCII file can be sent directly to the console or printer, 
because these are ASCII devices. However, if we transmit a binary file to 
the console, it will be largely unintelligible. 

An ASCII file can be viewed on the console screen by giving the CP/M 
command TYPE followed by the file name. But there are several disad¬ 
vantages to this command. First, the file may scroll so quickly that the 
desired location is missed. Control-S can be pressed to freeze the screen, 
and any key can be pressed to resume scrolling. Control-S can be pressed 
again to freeze the screen. If any key other than control-S is pressed during 
scrolling, the command is terminated and we must start over. 

Another disadvantage is that TYPE is a built-in CCP command. It can¬ 
not be given from the no-file level of a word processor such as WordStar. 
Program SHOW, given in Figure 6.7, solves both of these problems. 

SHOW displays an ASCII file on the console one screenful at a time. 
Each time the space bar is pressed, the next screen is displayed. Pressing the 
carriage return key will display the next line. The program is terminated 
by pressing any other key. 

SHOW is an executable program. Consequently, it can be run from the 
no-file level of WordStar. For example, to display the source program for 
SHOW, give the command 

SHOW SHOW. ASM 

Disk drive names can be used as needed. If the executable file is on drive A 
and the source file is on drive B, you can give the command 

A:SHOW B:SHOW.ASM 

SHOW can also be executed without a parameter. The program will 
then request the file name. If an error is made in entering the file name (too 
many characters or no characters), the request will be repeated. If the re¬ 
quested file name does not exist or if an attempt is made to display a COM 
file, the appropriate error message is printed and the program is terminated. 

SHOW is designed for the usual video screen of 24 lines. If your video 
screen has a different number of lines, change the definition of the symbol 
LMAX from 24 to the proper number. 

Type in the program given in Figure 6.7, assemble it, and execute it by 
displaying the source program of SHOW. If only the command SHOW is 
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TITLE 

'SHOW ASCII file on console' 


/ 

;(Put current date here) 


/ 

;Usage: SHOW DISKFILE.EXT 


;Press space bar to display next screen. 

/Carriage return to scroll up one line 


/performs same function as TYPE, but 


;SHOW 

:an be executed from WordStar. 

FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


/ 

BOOT 

EQU 

0 

/system reboot 

BDOS 

EQU 

5 

/BDOS entry point 

FCBl 

EQU 

5CH 

/input FCB 

DBUFF 

EQU 

80H 

/default buffer 

TPA 

EQU 

100H 

/transient program area 

LAAAX 

EQU 

24 

/lines per screen 

/ 

/Set flags in main program so only one 


/copy of certain subroutines will be generated. 

/Place set lines before MACLIB call. 


CIFLAG 

SET 

FALSE 

/input console char 

CMFLAG 

SET 

FALSE 

/ASCII compare 

COFLAG 

SET 

FALSE 

/output console char 

CRFLAG 

SET 

FALSE 

/carr-ret/line-feed 

DMFLAG 

SET 

FALSE 

/set DAAA 

FLFLAG 

SET 

FALSE 

/fill characters 

FNFLAG 

SET 

FALSE 

/read file name 

OPFLAG 

SET 

FALSE 

/open disk file 

PRFLAG 

SET 

FALSE 

/print console buffer 

RCFLAG 

SET 

FALSE 

/read console buffer 

RDFLAG 

SET 

FALSE 

/read disk file 

/end of flags 



/ 

AAACLIB 

CPMMAC 



Figure 6.7: Program SHOW to Display an ASCII File on the Console 
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ORG 

TPA 



START: 

ENTER 




VERSN 

'(current date).SHOW' 


LDA 

FCB1 -hi 



CPI 

BLANK 

;file name? 


JNZ 

OPEND 

;yes 


GFNAME 

FCB1 

;get file name 

OPEND: 





COMPRA 

'COM', FCB1 +9 ;COM file? 


JZ 

NOCOAA 

GO 

<D 

> 


OPEN 

FCB1 

;source file 


SETDMA 

DBUFF 

;use default 


LXI 

HJ00H 

;set pointer 

NEXTSC: 

CALL 

SCREEN 

;next screen 

FREE2: 

READCH 


;wait for input 


CPI 

BLANK 

;space? 


JZ 

NEXTSC 

;next screen 


CPI 

CR 



JNZ 

DONE 

;abort 


PCHAR 

CR 



MVI 

B,1 

;set one line 


CALL 

LINE 

;one line 


JAAP 

FREE2 


;routine to fill console screen 


SCREEN: 

AAVI 

B,LAAAX 

;line count 


PCHAR 

CR 


NEXTLN: 

CALL 

LINE 



DCR 

B 

;count 


JNZ 

NEXTLN 

;keep going 


RET 




Figure 6.7 (continued) 







/routine to display one line 
/ 

LINE: 


LIN3: 


LIN2: 


MOV 

A,H 

ORA 

A 

JZ 

LIN3 

READS 

FCB1 

JNZ 

EOFILE 

LXI 

H,DBUFF 

JMP 

LINE 

MOV 

A,M 

INX 

H 

ANI 

7FH 

CPI 

EOF 

JZ 

EOFILE 

MOV 

D,A 

CPI 

CR 

JNZ 

LIN2 

MOV 

A,B 

CPI 

1 

RZ 


MOV 

A,D 


NOCOM: 


EOFILE: 


DONE: 


PCHAR 

MOV 

CPI 

JNZ 

RET 

ERRORM 

READCH 

EXIT 


A,D 

CR 

LINE 


;check pointer 
;still 80-FF? 
;yes 

;read a sector 
;end of file 
/reset pointer 


/mask parity 
/file end 
/yes 
/save 
/line end? 

/no 

/check position 
/last line? 

/yes, skip CR 
/retrieve CR 

/send to console 
/restore 
/line end? 

/no 


'Use DUMP for a COM file',DONE 
/last page 


END 


START 


Figure 6.7 (continued) 














given the program will request the tile name. Press the space bar to view 
rnm arreef or the carnage return key to see the next hue. Press any 

other key to terminate the program. fcrnl , th . 

When SHOW begins execution, it checks the second byte of F< ^ B1 ( 
first character of the file name) to see if a file name was entered on the 
command line. A blank in this position indicates that no file name was 
given. In that case, a file name is requested. Macro GFNAME is used for 

^TherUhe file type is checked to ensure that it is not a COM file. If 
everything is all right, the requested file is opened. The defa ^^ f ^^° 
hex is used to read the disk sectors, but we specifically set the DMA address 
to this address just in case it was set to some other location by the previous 

PF We^ed to add one more macro to our library before we are ready to 
write the next program. 


A MACRO TO ABORT THE PROGRAM 
FROM THE CONSOLE 

Sometimes it is necessary to prematurely terminate a P^gram for one 
reason or another-perhaps a number was entered incorrectly from the 
console, or perhaps the program provided enough informaUon at t e 
beginning that the remainder of the program is not needed. For these 
reasons many operating systems allow an executing program to be 
^mSirdy temLued. Unfortunately, the CP/M operating%% 
does not provide this feature. Let us therefore write macro ABORT to 
prematurely terminate a program. Enter the macro shown in Figure 6.8 

'^LruTs^howmaao ABORT works. The macro referenced placed in 
a nroeram where you would like to check for termination. The console 
status is determined with BDOS function 11. On return from this function, 
the accumulator has a value of FF hex if a console key was pressed Ae ac¬ 
cumulator is zero otherwise. The macro then generates instructions to 
rotate the accumulator into the carry flag and check the carry flag. If t 
status indicates that no console key was pressed, the program branches 

around the remainder of the macro. 

If the carry flag is set, then a console key has been pressed. If t 
parameter was omitted from the macro reference, then the program wi 
terminate. However, if a parameter was included in the macro reference, 
then the character typed at the console is compared to this Pa^ter. ff 
they match, the program is terminated by a branch to the label DO . 
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ABORT MACRO 

CHAR 

;;(Put current date here) 


/’/‘Inline macro to abort program when 

,,console key given by CHAR is pressed. 

;;Any key will do if CHAR omitted. 

;;Branch to DONE on abort. 

;;Usage: ABORT 

ESC 

/ / 

;;Macro needed: READCH 

/ / 

LOCAL 

AROUND 

PUSH 

H 

PUSH 

D 

PUSH 

B 

MVI 

C# 11 /console status 

CALL 

BDOS 

POP 

B 

POP 

D 

POP 

H 

RRC 


JNC 

AROUND ;no character 

READCH 

;get char 

IF 

NUL CHAR 

JMP 

DONE 

ELSE 


CPI 

CHAR 

JZ 

DONE 

ENDIF 


AROUND: 

;/ABORT 

ENDM 



Figure 6.8: Macro ABORT to Terminate a Program from the Console 


Let us use an example to clarify this. We will always use the macro 
reference 

ABORT ESC 

for the programs in this book. The macro will then generate instructions 
to terminate the program only if the escape key has been pressed. Any 
other key will be ignored. 

We are now ready to write our next program. 
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DISPLAYING A BINARY FILE ON THE CONSOLE 

The program in Figure 6.7 will display an ASCII file on the video 
screen, but it cannot be used for a binary file. Sometimes, however, it is 
necessary to study a binary executable (COM) file. This can be accom¬ 
plished with the program given in Figure 6.9. Of course, this program can 
also display an ASCII file, but the output is not as readable as the output 
from SHOW. Type the program using the file name DUMP. Assemble it 
and execute it. The command line is the same as that used for SHOW. 

The output from DUMP is similar to that from DDT. Each line begins 
with the corresponding memory location (starting at the beginning of the 
TP A). Then 16 bytes are given in hexadecimal. The ASCII equivalents of 
the characters are also given if they are printable; a decimal point is shown 
otherwise. The display freezes after the screen is filled. Pressing the space 
bar displays the next screen, while a carriage return shows the next line. 
Press the escape key to terminate the program. (We check for termination 
at the end of each line.) 

The remaining two programs in this chapter further demonstrate the 
use of our disk-related macros. Both programs use our new macro to read 
existing disk files. 


TITLE 

'DUMP binary file to console' 


;(Put current date here) 



;Usage: DUMP (file name) 


;space 

bar = next screen 


;<CR> 

= next line 



,<ESC> = abort 



FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

EQU 

0 

;system reboot 

BDOS 

EQU 

5 

;BDOS entry point 

FCB1 

EQU 

5CH 

;input FCB 

DBUFF 

EQU 

80H 

;default buffer 

TPA 

EQU 

100H 

;program start here 

LAAAX 

EQU 

23 

;maximum lines 


Figure 6.9: Program DUMP to View a Binary File 
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JNC 

PAS4 

;no 

PAS3: 





MVI 

A, PERIOD 

;change 

PAS4: 





PCHAR 


;print it 


MOV 

A,L 



ANI 

OFH 

;line end? 


JNZ 

PAS2 

;no 


POP 

H 

;buffer pointer 


ABORT 

ESC 

;quit? 


LDA 

LINE 



DCR 

A 



STA 

LINE 



JNZ 

NEWLN 



MVI 

A,LMAX 



STA 

LINE 


”1 

CD 

CD 

N 

CD 

line until space bar pressed 


FREEZ: 





READCH 


;wait for input 


CPI 

BLANK 

;space bar? 


JZ 

NEWLN 



ANI 

1FH 

;convert to control 


CPI 

CR 

;next line? 


JNZ 

FREZ2 

;no 


MVI 

A,1 

;one line 


STA 

LINE 



JMP 

NEWLN 


LINE: 





DB 

LMAX 

;line count 

FREZ2: 





CPI 

ESC 

;abort? 


JNZ 

FREEZ 

;no 

DONE: 





EXIT 



PNTR: 

DS 

2 

;display pointer 


END 

START 



Figure 6.9 (continued) 
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AUTOMATIC ENVELOPE ADDRESSING 

If you use a word processor such as WordStar to write letters, you can 
print the letter on the computer list device. However, you will still need a 
typewriter to address the envelope. With the program given in Figure 6.10, 
you can automatically print the envelope after you have printed the letter. 

A WordStar-compatible file for the beginning of a letter might look 
like this: 


..Name of sender 

.op (omit page numbers) 

(blank line) 

Today’s date 
(blank line) 

Name of addressee 
Street address 
City, State Zip code 
(blank line) 

Salutation 

Word processors typically interpret a special character in column 1 as 
the beginning of a command line. This character is frequently a period, 
because a period will not otherwise appear in the first column. The first 
line of this file begins with two periods, the WordStar symbol for a com¬ 
ment line. 

The program given in Figure 6.10 can extract the recipient’s name and 
address and print it onto an envelope. If the originator’s name is included 
at the beginning of the file as a comment, it will be printed in the return- 
address area. Create a file named ADDRESS and enter the text shown in 
Figure 6.10. Assemble the program and run it. 

The ADDRESS program is executed by typing its name and the name 
of the letter file. Alternatively, the file name can be given after the program 
has started. This program has an additional feature. The originator’s 
name is normally placed in the upper left corner of the envelope. If, 
however, a separate letter L is given after the file name, then the sender’s 
name is aligned with the recipient’s name and address. This form is more 
suitable for addressing labels. 


CHECKING FOR PAIRED CONTROL CHARACTERS 

Our final program will check for paired control characters in disk files. 
We use macro GFNAME to input a file name from the console, macro 
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TITLE 'ADDRESS envelope from letter' 

/ 

;(Put current date here) 

; Usage: 

; ADDRESS DISKFILE.EXT (for envelope) 
; ADDRESS DISKFILE.EXT L (for label) 

;Letter file has the form: 

Author (for return address) 

;.op and other dot commands (optional) 
;blank line (optional) 

;Date (one line) 

;blank line (one or more) 

; Address 
;blank line 


FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

EQU 

0 

;system reboot 

BDOS 

EQU 

5 

;BDOS entry point 

FCB1 

EQU 

5CH 

;first parameter 

FCB2 

EQU 

6CH 

;second parameter 

DBUFF 

EQU 

80H 

;default buffer 

TPA 

EQU 

100H 

transient program area 

BEL 

EQU 

7 


/ 

;Set flags in main program so only one 


;copy of certain subroutines will be generated. 

;Place set lines before 

AAACLIB call. 


CMFLAG 

SET 

FALSE 

;ASCII compare 

COFLAG 

SET 

FALSE 

;output console char 

CRFLAG 

SET 

FALSE 

;carr-ret/l i ne-feed 

FLFLAG 

SET 

FALSE 

;fill characters 

FNFLAG 

SET 

FALSE 

;get file name 

LOFLAG 

SET 

FALSE 

;l ist output 

OPFLAG 

SET 

FALSE 

;open disk file 


Figure 6.10: Program ADDRESS to Automatically Address an Envelope 
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PRFLAG 

SET 

FALSE 

;printer output 

RCFLAG 

SET 

FALSE 

;read console 

RDFLAG 

SET 

FALSE 

;read disk file 

;end of flags 



/ 

AAACLIB 

CPMAAAC 


ORG 

TPA 



START: 

ENTER 




VERSN 

'(current date).ADDRESS' 


LDA 

FCB1 +1 



CPI 

BLANK 

;file name? 


JNZ 

OPEND 

;yes 


GFNAME 

FCBl 

;get file name 

OPEND: 

COMPRA 

'COM', FCBl +9 

;COM file? 


JZ 

NOCOM 

;yes 


AAV 1 

A, 35 

;envelope indentation 


STA 

INDNC 

;save count 


LDA 

FCB2+1 

;2nd parameter? 


CPI 

BLANK 



JZ 

NOPAR 

;no 


AAVI 

A, 14 



STA 

INDNC 

;label indentation 

NOPAR: 

OPEN 

FCBl 

;source file 


READS 

FCBl 

;f irst sector 


LXI 

H,DBUFF 

;text buffer 

;find period with author 



MOV 

A,M 



CPI 

PERIOD 



JNZ 

NOPER 

;no author 


INX 

H 



MOV 

A,M 



CPI 

PERIOD 

;second dot? 


JNZ 

FPER 

;no 


INX 

H 

;skip dots 


MVI 

B,14 

indentation 


Figure 6.10 (continued) 





READING DISK FILES WITH BDOS 201 


CALL 

PLINE 

;for author 

FPER2: 


;find other periods 

MOV 

A,M 


CPI 

PERIOD 


JNZ 

FBLNK 


CALL 

LINE 


JAAP 

FPER2 


/ 

;no author, process other dot commands 

/ 

FPER: 

CALL 

LINE 

;next line 

CPI 

PERIOD 


JZ 

FPER 


NOPER: 

MVI 

B, 1 


CALL 

LINEFD 

;skip author 

FBLNK: 


;find blank 

MOV 

A,AA 


CPI 

BLANK+1 


JNC 

FDATE 

;not blank or CR 

CALL 

LINE 


JMP 

FBLNK 


FDATE: 


;find date 

CALL 

LINE 

;skip to blank 

MOV 

A,AA 


CPI 

BLANK+1 


JC 

FDATE 

/additional blanks 

;space down to address 


MVI 

B,9 


CALL 

LINEFD 


;print address 

ADDR2: 

AAOV 

A,AA 


CPI 

BLANK-FI 

/additional 

JC 

DONE 


LDA 

INDNC 

/indentation 

AAOV 

B,A 

/for address 


Figure 6.10 (continued) 
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CALL 

PUNE 



JAAP 

ADDR2 


/ 

;send line 

feeds to 

printer, B has number 


LINEFD: 

LCHAR 

LF 



DCR 

B 



JNZ 

LINEFD 



RET 



;output line to printer and console 


PUNE: 

CALL 

INDEN 



MOV 

PCHAR 

LCHAR 

A ,M 

;first character 

PLINE2: 

CALL 

CPOINT 

;check pointer 


MOV 

A,M 

;next character 


PCHAR 

LCHAR 

ANI 

7FH 

;mask parity 


CPI 

LF 



JNZ 

PLINE2 

;yes 


INX 

H 



RET 



;move to beginning of next line, after LF 


LINE: 

CALL 

CPOINT 

;check pointer 


MOV 

A,M 

;next character 


ANI 

7FH 

;mask parity 


CPI 

LF 



JNZ 

LINE 

;yes 


INX 

H 



RET 



increment HL pointer, see if past 80 + 80 hex. 

;Read another sector if so. 



Figure 6.10 (continued) 
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CPOINT: 

INX 

MOV 

ORA 

RZ 

READS 

JNZ 

H ;pointer 

A,H ;check pointer 

A ;<100H? 

;yes, ok 

FCB1 ;next sector 

DONE ;endoffile 


LXI 

RET 

H ( DBUFF ;reset pointer 

INDEN: 

MVI 

A, BLANK 

INDEN2: 

PCHAR 

LCHAR 

DCR 

B 


JNZ 

INDEN2 


RET 


NOCOM: 

ERRORM 

'?COM file', DONE 

DONE: 

EXIT 


INDNC: 

DS 

1 /indentation 

/ 

END 

START 


Figure 6.10: (continued) 


OPEN to open a disk file, and macro ERRORM to print an error message 
and terminate the program. We also introduce the inline macros REPT, 
IRP, and IRPC. 

Some word processors use paired control characters to indicate special 
operations during printing. For example, in WordStar files, a passage to 
be underlined is enclosed in control-S characters. Other control 
characters are used for boldface, superscript, and subscript indicators. If 
the second member of the pair is inadvertently omitted, the resulting 
document will be unusual. For example, if the second underline character 
is omitted, all of the remaining words will be underlined. 

The program given in Figure 6.11 can be used to check a document for 
paired control characters. The program is designed for use with WordStar, 
but it can be altered easily for use with other word processing programs. 
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TITLE 'PAIR checks pairs of control char' 

/ 

;(Put current date here) 


•Usage: PAIR DISKFILE.EXT 


/ 

;Checks that control-B, 

-D, -S, -T, -V, and 

-X are paired 

FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

EQU 

0 

;system reboot 

BDOS 

EQU 

5 

;BDOS entry point 

FCB1 

EQU 

5CH 

;input FCB 

DBUFF 

EQU 

80H 

;default buffer 

TPA 

EQU 

100H 

transient program area 

/ 

;Set flags 

in main program so only one 


;copy of certain subroutines will be generated. 

;Place set lines before MACLIB call. 


/ 

Cl FLAG 

SET 

FALSE 

;input console char 

CMFLAG 

SET 

FALSE 

;ASCII compare 

COFLAG 

SET 

FALSE 

;output console char 

CRFLAG 

SET 

FALSE 

;carr-ret/line-feed 

DMFLAG 

SET 

FALSE 

;set DMA 

FLFLAG 

SET 

FALSE 

;fill characters 

FNFLAG 

SET 

FALSE 

;read file name 

OPFLAG 

SET 

FALSE 

;open disk file 

PRFLAG 

SET 

FALSE 

;print console buffer 

RCFLAG 

SET 

FALSE 

;read console buffer 

RDFLAG 

SET 

FALSE 

;read disk file 

;end of flags 




MACLIB 

CPMAAAC 


ORG 

TPA 



START: 





Figure 6.11: Program PAIR to Count Pairs of Control Characters 
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ENTER 




VERSN 

'(current date). PAIR' 


LDA 

FCB1+1 



CPI 

BLANK 

;file name? 


JNZ 

OPEND 

;yes 


GFNAME 

FCB1 

;get file name 

OPEND: 





COMPRA 

'COM', FCB1 +9 

;COM file? 


JZ 

NOCOM 

;yes 


PRINT 

<CR,LF, 'Looking 

for unbalanced '> 


PRINT 

,A B, A D, A S, A T, A V 

A X' 


OPEN 

FCB1 

;source file 


SETDMA 

DBUFF 

;use default 


LXI 

H,100H 

;set pointer 

LINE: 





MOV 

A,H 

;check pointer 


ORA 

A 

;still 80-FF? 


JZ 

LIN3 

;yes 


READS 

FCB1 

;read a sector 


JNZ 

EOFILE 

;end of file 


LXI 

H, DBUFF 

;reset pointer 


JMP 

LINE 


LIN3: 





MOV 

A,M 



INX 

H 



ANI 

7FH 

;mask parity 


CPI 

EOF 

;file end 


JZ 

EOFILE 

;yes 

"inline macro to count occurrences of control char 


IRPC 

X?, BDSTVX 



LOCAL 

AROUND 


CTR&X? 

EQU 

'&X?' - '@' 



CPI 

CTR&X? 



JNZ 

AROUND 



LDA 

CNT&X? 



INR 

A 



STA 

CNT&X? 



JMP 

LINE 



Figure 6.11 (continued) 
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CNT&X?: 

DB 

0 

AROUND: 


ENDM 

JAAP 

LINE ;no 

NOCOM: 


ERRORM 

'COM file?', DONE 

UFLAG: 

DB 

0 

EOFILE: 

;;in 1 ine macro to show unbalanced control char 


IRPC 

X?, BDSTVX 


LOCAL 

AROUND 


LDA 

CNT&X? 


RAR 

;;odd? 


JNC 

AROUND ;;no 


PRINT 

<CR,LF,'Unbalanced A '> 


PCHAR 

'&X?' 


LDA 

UFLAG 


INR 

A 


STA 

UFLAG 

AROUND: 


ENDM 

LDA 

UFLAG 


ORA 

A ;ok 


JNZ 

DONE ;no 


PRINT 

<CR,LF,'No unbalanced pairs'> 

DONE: 

/ 

EXIT 

END 

START 


Figure 6.11 (continued) 


In particular, the program counts the number of control-B, -D, -S, -T, -V, 
and -X characters. If there is an odd number of any of these, an error is 
reported. If the count is even, the message ‘No unbalanced pairs’ is given. 
Of course, if two terminal control characters of the same type are omitted, 
the program will not notice it. 

This program, like the others in this chapter, is executed by giving its 
name and the name of the file to be read. The instructions are similar, but 
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we introduce a new feature. Two indefinite repeat macros, IRPC, are used. 
These macros make it easy to program sets of instruction that differ only 
in one letter. 

The macros we have used previously are defined at the beginning of the 
program or in a separate macro library. Then the macro name and any 
parameters are placed in the program wherever they are needed. The 
repeat macros are different. They are defined directly within the program 
as they are needed. 

The inline macros begin with the name REPEAT, IRP, or IRPC and end 
with the usual ENDM statement. There is no other name associated with 
this type of macro. Following is the first of the two repeat macros: 


"inline macro to count occurrences of control char 


CTR&X? 


CNT&X?: 

AROUND: 


IRPC 

X?, BDSTVX 

LOCAL 

AROUND 

EQU 

'&X?' - '@' 

CPI 

CTR&X? 

JNZ 

AROUND 

LDA 

CNT&X? 

INR 

A 

STA 

CNT&X? 

JAAP 

LINE 

DB 

0 

ENDM 



This macro generates six slightly different sets of instructions. The first 
parameter, X?, is a dummy variable. The second parameter contains the 
reference parameters—six characters, the letters B, D, S, T, V, and X. 
The macro is therefore expanded six times. For the first copy, the param¬ 
eter B replaces the X? symbol. The ampersand is a linking character. Its 
occurrence next to the original dummy parameter indicates that the 
reference parameter is to be joined with the adjacent text. For example, 
the first expansion will produce the following passage: 


0002+ = 

CTRB 

EQU 

'B' - '@' 

0396+FE02 


CPI 

CTRB 

0398 + C2A603 


JNZ 

??0037 

039B + 3AA503 


LDA 

CNTB 

039E + 3C 


INR 

A 

039F + 32A503 


STA 

CNTB 

03A2 + C36903 


JMP 

LINE 

03A5 + 00 

CNTB: 

DB 

0 
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There will be five similar sections following this one. At each macro ex¬ 
pansion, the ampersand characters are removed by the assembler after 
joining the actual parameter. Some macro assemblers leave the ampersand 
character in the final listing. The JNZ ??0037 instruction causes a branch 
to the end of this passage, address 3A6. Notice that control-B, binary two, 
is obtained by subtracting the at-sign from the letter B. The other control 
characters are created similarly. 


SUMMARY 

In this chapter we have learned how the file control block describes and 
manages files on the disk, and we have learned how to read a disk file. We 
wrote a macro to print an error message, one to open an existing disk file, 
one to set the DMA address, one to read a disk sector, one to input a file 
name after a program has begun executing, and another to abort a program 
from the console. We also looked briefly at the inline repeat macro IRPC. 

We wrote several executable programs that demonstrate uses for these 
macros. SHOW prints an ASCII file on the console; DUMP displays a 
binary file in hex and ASCII; ADDRESS copies the address from a letter 
file onto an envelope; and PAIR checks a text file for balanced control 
characters. In the next chapter we will develop macros and programs that 
deal with writing disk files. 

Your macro library directory should now look like this: 


;;Macros in this library 


Flags 

;; ABORT 

AAACRO 

CHAR 

Cl FLAG, COFLAG 

;;AMBIG 

AAACRO 

OLD, NEW 

(none) 

;;COMPAR 

AAACRO 

FIRST, SECOND, BYTES 

CAAFLAG 

;;COMPRA 

AAACRO 

FIRST, SECOND, BYTES 

CAAFLAG 

"CPAAVER 

AAACRO 


(none) 

;;CRLF 

AAACRO 


CRFLAG, COFLAG 

;;ENTER 

AAACRO 


(none) 

"ERRORAA 

AAACRO 

TEXT, WHERE 

COFLAG, CRFLAG, PRFLAG 

"EXIT 

AAACRO 

SPACE? 

(none) 

/"FILL 

AAACRO 

ADDR, BYTES, CHAR 

FLFLAG 

"GFNAAAE 

AAACRO 

FCB 

FNFLAG, FLFLAG, REFLAG 

"HEXHL 

AAACRO 

POINTR 

COFLAG, CRFLAG, PRFLAG 
HXFLAG, RCFLAG 

;;LCHAR 

AAACRO 

PAR 

LOFLAG 

;;MOVE 

AAACRO 

FROAA, TO, BYTES 

AAVFLAG 

"OPEN 

AAACRO 

POINTR, WHERE 

OPFLAG, COFLAG, PRFLAG 
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;;OUTHEX 

MACRO 

REG 

CXFLAG, COFLAG 

;;PCHAR 

MACRO 

PAR 

COFLAG 

;;PRINT 

MACRO 

TEXT, BYTES 

PRFLAG, COFLAG 

;;READB 

AAACRO 

BUFFR 

RCFLAG 

;;READCH 

AAACRO 

REG 

Cl FLAG, COFLAG 

;; READS 

AAACRO 

POINTR, STAR 

RDFLAG, COFLAG 

;;SBC 

AAACRO 


(none) 

;;SETDAAA 

AAACRO 

POINTR 

DMFLAG 

;;SYSF 

AAACRO 

FUNC, A,E 

(none) 

;;UCASE 

MACRO 

REG 

(none) 

;;UPPER 

AAACRO 

REG 

(none) 

;;VERSN 

MACRO 

NUM 

(none) 






















































































CHAPTER 7 



WRITING 

DISK 

FILES 

WITH BDOS 



INTRODUCTION 

The programs we have written so far have not changed the disk itself. 
We have developed programs for reading disk files, but not for writing 
them. In this chapter we will write macros MAKE, UNPROT, PFNAME, 
DELETE, SETUP2, RENAME, CLOSE, and WRITES for creating 
and altering disk files. We will also write several executable programs: 
COPY for duplicating an existing disk file, CRYPT for encrypting a file, 
RENAME for renaming files, and DELETE for deleting files. Notice that 
we use RENAME and DELETE both as program names and macro 
names. CP/M uses the program name and the assembler uses the macro 
name, so there is no conflict. Let us begin with macro MAKE. 


A MACRO TO CREATE A NEW DISK FILE 

We saw in Chapter 6 that it is necessary to open an existing disk file with 
BDOS function 15 before it can be read. To create a new disk file, we must 
use BDOS function 22. The first part of a file control block (FCB) is 
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created in memory, just as it is when opening an existing disk file. The first 
byte of the memory FCB designates the disk drive. A value of 0 indicates 
the default drive, 1 is drive A, 2 is drive B, and so on. The file name and file 
type are placed in the next 11 bytes. The DE register is loaded with the 
FCB address, and register C is given the value of 22. A call to address 5 
completes the operation. 

Macro MAKE, shown in Figure 7.1, can be used to create a new disk 
file by allocating an FCB in the disk directory. The parameter POINTR 
references the location of the memory FCB. Add macro MAKE to your 
macro library. 

One or more blocks of sectors on each disk are allocated to the disk 
directory. The exact number is fixed, but it will differ from one disk format 
to another. The number of directory entries is also fixed, because there 
are four disk FCBs for each 128-byte sector. At some point, all of the 
allocated directory space may be in use. Consequently, when BDOS func¬ 
tion 22 is used to create a new disk file, it determines whether there is 
room for another FCB. 

On return from BDOS function 22, the accumulator is set to a value of 
FF hex if the directory is filled. Macro MAKE therefore checks the ac¬ 
cumulator after return from BDOS. If the directory is full, an error 
message is printed and the program branches to location DONE. The flag 
MKFLAG ensures that only one copy of subroutine MAKE2? is created. 
Macro SYSF performs the BDOS call, and macro ERRORM prints the 
appropriate error message if there is no directory space. 

Our next macro changes the read-only attribute of a disk file to 
read/write. 


UNPROTECTING A DISK FILE 

CP/M disk files can be protected against accidental erasure by setting 
the read-only feature. If we want to alter or erase a file, we must make sure 
that it is set to read/write. This feature is implemented in CP/M version 2 
by coding the first character of the file type. If the high-order bit of this 
character is set to 1, then the file is considered to be write protected. If this 
bit is reset to 0, the file can be altered or erased. 

Let us observe this phenomenon with DDT or SID. Go to drive A and 
determine the attributes of the executable files with the command 

ST AT *.COM 

This will list all COM files in alphabetical order. The symbol R/O will ap¬ 
pear in front of those files that are protected (read only). If the symbol 
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AAAKE MACRO POINTR 
;;(Put current date here) 

;;lnline macro to create a new disk file. 
;;POINTR refers to file control block. 

;;Extent and current record number are zeroed. 
;;Macros needed: SYSF, ERRORM 


// 

LOCAL 

AROUND 


LXI 

D,POINTR 


XRA 

A 

;zero 

STA 

POINTR+12 

;extent 

STA 

POINTR+ 32 

;current record 

CALL 

AAAKE2? 


INR 

A 

;0=ok, FF means error 

JNZ 

AROUND 


ERRORM 

'No directory space', DONE 

IF 

NOT MKFLAG 


MAKE2?: SYSF 

22 

;make new disk file 

MKFLAG SET 

ENDIF 

TRUE 

;only one copy 

AROUND: 

ENDM 


;; AAAKE 


Figure 7.1: Macro MAKE to Create a New Disk File 


R/W (read/write) is shown instead, the file is not protected. The listing 
might look like this: 


Rees 

Bytes 

Ext 

Acc 

6 

2k 

1 

R/O A.SAVEUSER. COM 

6 

2k 

1 

R/W A:SHOW.COM 

42 

6k 

1 

R/O A:STAT.COM 

10 

2k 

1 

R/O A:SUBMIT.COM 

12 

2k 

1 

R/O A.SYSGEN.COM 

Bytes 

Remaining On A: 6k 


We will need a protected file for the next step. If all of the files are un¬ 
protected, use STAT to change the protection of one of them—STAT 
itself, for example. Give the command 

STAT STAT.COM $R/0 
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Be sure to place a space in front of the dollar sign but not afterward. Give 
the STAT command again to ensure that STAT is protected. 

Execute the debugger DDT or SID by typing its name, but do not give 
any parameters at this time. We will now write a small program in 
memory starting at 4000 hex, using the A command: 

A4000 

4000 LXI D,5C 
4003 MVI C,0F 
4005 CALL 5 
4008 RST 7 

(Type an extra carriage return to finish the program.) Do not execute this 
program just yet. When it is executed, it will open the disk file named in 
the FCB at address 5C hex, the value in register DE. Register C is loaded 
with the value OF hex (15 decimal), the BDOS open function. After 
returning from the BDOS call, the routine branches to restart 7 at address 
37 hex, the normal return to the debugger. 

We will now create the first part of an FCB at location 5C hex. The 
debugger is used for this step. Give the command 

ISTAT.COM 

The I command initializes a memory FCB for file name STAT.COM on 
the default disk. Observe the results by displaying the FCB region with the 
command D50,6F: 


0050: 00 00 00 00 00 00 00 00 00 00 00 00 00 53 54 41 .STA 

0060: 54 20 20 20 20 43 4F 4D 00 00 00 00 00 20 20 20 T COM. 


Notice that the four remaining characters in the file name STAT are 
blanks. Now give the debugger command G4000. This will execute the 
program we wrote at 4000 hex. The default drive will start up, and then 
control will return to the debugger. Examine memory again with the 
debugger command D50,6F: 


0050: 00 00 00 00 00 00 00 00 00 00 00 00 00 53 54 41 .STA 

0060: 54 20 20 20 20 C3 4F 4D 00 00 80 2A 06 07 08 00 T .0M. 


In this example we see that the ASCII representation of the file name has 
been changed from 

STAT COM 

to 


STAT .OM 
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When the BDOS open function (15) was executed, CP/M changed the 
file type of the memory FCB to match the file type of the disk FCB. The 
first character of the file type, the letter C, has been changed. Now look at 
the hexadecimal representation of this character (address 65 hex). The 
original value of 43 hex has been changed to C3 hex. The hexadecimal and 
corresponding ASCII values are as follows: 

43 4F 4D COM 

C3 4F 4D .OM 

Comparing the two, we see that they differ in the high-order bit used to 
indicate write protection: 

Hex Binary 

43 0100 0011 

C3 1100 0011 

You can return to the system level of CP/M, change the protection at¬ 
tribute of STAT, and repeat the above steps. In this case, the file extension 
will remain COM after the open function is executed. 

We will now write macro UNPROT (shown in Figure 7.2) to unprotect 
a disk file with BDOS function 30. This BDOS function can set the four 
file attributes—read only (R/O), read/write (R/W), system (SYS), and 
directory (DIR). We will only use it to unprotect a file. This macro resets 
the high-order bit of the memory FCB referenced by the parameter 
POINTR. The accumulator is loaded with the first character of the file 
type in position 9. The high-order bit is reset by performing a logical AND 
with the value of 7F hex (0111 111 1). The result is put back into place. 
Macro SYSF is used to perform BDOS function 30, which changes the 
extension of the disk FCB to match the memory FCB. 

Add macro UNPROT to your library. The flag UNFLAG ensures that 
only one copy of subroutine UNPR2? will be created. Our next macro 
displays the file name of a memory FCB on the console screen. 

A MACRO TO PRINT AN FCB FILE NAME 

We have seen that the first part of a memory FCB specifies the disk 
drive in position 0 and the file name in positions 1—8. Names shorter than 
eight characters are filled out with blanks. Positions 9-11 contain the file 
type. Thus the file name LONGNAME.EXT is actually stored as 
LONGNAMEEXT. A shorter name, such as A.TYP, will be coded as 

A-TYP (the underline characters represent blanks). Because 

we will occasionally need to display the file name associated with an FCB, 
let us now write a macro for this purpose. 
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UNPROT MACRO POINTR 
;;(Put current date here) 

;;lnline macro to convert R/O file to R/W. 
;;POINTR refers to file control block. 
;;Macro needed: SYSF 


/ / 

LOCAL 

AROUND 


LXI 

D, POINTR 


LDA 

POINTR+9 


ANI 

7FH 


STA 

POINTR+9 


CALL 

UNPR2? 


IF 

NOT UNFLAG 


JMP 

AROUND 

UNPR2?: 

SYSF 

30 

UNFLAG 

SET 

ENDIF 

TRUE 

AROUND: 

ENDM 



;load from file type 
;set for R/W 

;store at beginning of file type 


;set file attributes 
;only one copy 

;;UNPROT 


Figure 7.2: Macro UNPROT to Unprotect a Disk File 


Macro PFNAME, shown in Figure 7.3, displays the referenced file 
name in its usual CP/M form rather than the way it is stored in the FCB. 
Blank characters are removed and a period is placed between the primary 
name and the extension. Macros PRINT and PCHAR are used. Add macro 
PFNAME to your library. 


A MACRO TO DELETE A DISK FILE 

We have seen that the first byte of the memory FCB begins with the 
drive type, while the first byte of the disk FCB contains the user number. 
To delete a file, the initial byte of the disk FCB must be changed to a value 
of E5 hex. The remainder of the FCB and the actual file are not altered. 
This new value allows the disk space allotted for that file to be written 
over. Only when this happens is the file actually changed. 

BDOS function 19 is used to delete a disk file. We will perform this 
operation with macro DELETE, shown in Figure 7.4. The macro begins 
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PFNAME 

AAACRO 

FCB 


;;(Put current date here) 


;;lnline macro to print file name as 


;; FIRST.EXT 




;;FCB is file control block. 


;;Macros needed: PCHAR, PRINT 


// 

LOCAL 

PFNA2?, PFNA3? 


PUSH 

H 



PUSH 

B 



MVI 

B,8 

;name length 


LXI 

H,FCB + 1 

;start 

PFNA3?: 





MOV 

A,M 

;get char 


CPI 

BLANK 



JZ 

PFNA2? 

;end 


PCHAR 


; print 


INX 

H 



DCR 

B 



JNZ 

PFNA3? 


PFNA2?: 





POP 

B 



POP 

H 



PCHAR 

/ / 



PRINT 

FCB 4-9, 3 

;exten 




;; PFNAME 


ENDM 




Figure 7.3: Macro PFNAME to Print the File Name Associated with an FCB 


DELETE MACRO POINTR, WHERE 

;;(Put current date here) 

;;lnline macro to delete an existing disk file. 
;;POINTR refers to file control block. 

;;lf file is protected, branch to WHERE or DONE. 
/ / 

"Macros needed: SYSF, UNPROT, READCH, 


Figure 7.4: Macro DELETE to Delete a Disk File 
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;; PFNAME, PRINT, UCASE, CRLF 


// 

LOCAL 

AROUND, DEL3? 



LXI 

D,POINTR 



LDA 

POINTR+9 



ANI 

80H 

protected? 


JZ 

DEL3? 

;no 


CRLF 

PFNAME 

POINTR 



PRINT 

' is READ ONLY. Delete? ' 


READCH 

UCASE 

CPI 

'Y' 



IF 

NOT NUL WHERE 



JNZ 

WHERE 



ELSE 




JNZ 

DONE 

;quit 


ENDIF 

UNPROT 

POINTR 


DEL3?: 

CALL 

DEL2? 



IF 

NOT DEFLAG 



JMP 

AROUND 


DEL2?: 

SYSF 

19 

;delete disk file 

DEFLAG 

SET 

ENDIF 

TRUE 

;only one copy 

AROUND: 

ENDM 


;;DELETE 


Figure 7.4 (continued) 


by loading the DE register with the FCB address. Then the first character 
of the file type (at FCB1 +9) is inspected to see whether the file is write 
protected. If it is, the file name is displayed on the console and permission 
to delete it is requested. If the user enters a Y, the file is unprotected with 
macro UNPROT. If any other character is entered, the macro terminates 
with a branch to the second parameter WHERE if it has been provided. 
Otherwise, the program branches to DONE. Notice that macro DELETE 
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references several other macros in our library. Add this macro to the 
library. 

There is a further complication if the file is protected. An unprotected 
file can be deleted without first performing an open function, but a protected 
file cannot. We saw previously in this chapter that the first character of 
the file type is altered if the file is protected. It is very important that a 
CP/M open command be issued prior to executing the delete function, or 
BDOS will not be able to find the file. For example, if you want to delete a 
protected file called FIRST.COM, you must search for a file that looks 
like FIRST..OM. The open function will convert the requested file name 
to the form needed by BDOS. The open function is not incorporated into 
macro DELETE, but in our programs we will always be careful to open a 
file prior to using macro DELETE. 


INVESTIGATING TWO FILE CONTROL BLOCKS 
WITH THE DEBUGGER 

We have already learned how CP/M can help us construct a memory 
FCB from a parameter given on the command line. We used the debugger 
DDT or SID in this investigation. Let us continue this study by using two 
parameters on the command line. Be sure to choose file names that do not 
exist, or the debugger will load the requested files and delete the memory 
FCBs. Give the command 

A:DDT FIRST.EXT SECOND.TYP 

or 

A:SID FIRST.EXT SECOND.TYP 
Look at the results with the command 
D50 ( 9F 

The console screen should look like this: 


0050 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

46 

49 

52 



0060 

53 

54 

20 

20 

20 

45 

58 

54 

00 

00 

00 

00 

00 

53 

45 

43 

ST EXT.... 


0070 

4F 

4E 

44 

20 

20 

54 

59 

50 

00 

00 

00 

00 

00 

FF 

00 

BF 

0ND TYP.... 


0080 

15 

20 

46 

49 

52 

53 

54 

2E 

45 

58 

54 

20 

53 

45 

43 

4F 

. FIRST.EXT 

SEC0 

0090 

4E 

44 

2E 

54 

59 

50 

00 

00 

00 

00 

00 

00 

00 

00 

00 

00 

ND.TYP. 



Notice that the first parameter, FIRST.EXT, appears as an FCB starting 
at 5C hex. The first byte is a binary zero, specifying the default drive, 
because no disk drive was included in the file name. The primary name 
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FIRST appears next in uppercase letters. Three blanks fill out the eight- 
character field. The three letters of the extension appear next. 

The second parameter, SECOND.TYP, has been treated similarly. The 
first part of another FCB begins at 6C hex. The command line tail con¬ 
taining both parameters begins at location 82 hex. The length of this tail, 
15 hex, is stored at location 80 hex. 

Return to CP/M by typing control-C; then type the command 

A:DDT B:FIRST.EXT BrSECOND.TYP 


or 


A:SID BrFIRST.EXT BrSECOND.TYP 

Again, examine the beginning of memory with the debugger. The result 
should look like this: 


0050 00 00 00 00 
0060 53 54 20 20 
0070 4F 4E 44 20 
0080 19 20 42 3A 
0090 53 45 43 4F 


00 00 00 00 00 00 
20 45 58 54 00 00 
20 54 59 50 00 00 
46 49 52 53 54 2E 
4E 44 2E 54 59 50 


00 00 02 46 49 52 
00 00 02 53 45 43 
00 00 00 FF 00 BF 
45 58 54 20 42 3A 
00 00 00 00 00 00 


.FIR 

ST EXT.SEC 

OND TYP. 

. BrFIRST.EXT B: 
SECOND.TYP. 


Notice that the command line tail shows that drive B was specifically 
requested. Furthermore, the drive types at addresses 5C and 6C hex con¬ 
tain a value of 2, indicating that drive B was requested. 

Return to CP/M with control-C, and for the third test give the command 

DDT FIRST.EXT *.TYP 
or 

SID FIRST.EXT *.TYP 
Examine memory from 50 to 9F hex: 


0050 00 00 00 00 
0060 53 54 20 20 
0070 3F 3F 3F 3F 
0080 10 20 46 49 
0090 50 00 00 00 


00 00 00 00 00 00 
20 45 58 54 00 00 
3F 54 59 50 00 00 
52 53 54 2E 45 58 
00 00 00 00 00 00 


00 00 00 46 49 52 
00 00 00 3F 3F 3F 
00 00 00 FF 00 BF 
54 20 2A 2E 54 59 
00 00 00 00 00 00 


.FIR 

ST EXT.??? 

?????TYP. 

. FIRST.EXT *.TY 
P. 


In this example the first FCB, starting at address 5C hex, looks as it did in 
the previous tests. However, the first part of the second FCB, starting at 
address 6C hex, is filled with question marks. When an asterisk appears in 
a file name, CP/M expands the field in the FCB with question marks, the 
wild-card character. However, the command tail starting at 82 hex still 
shows the asterisk. 
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OPENING A FILE WHEN TWO 
FILE NAMES ARE GIVEN 

Later in this chapter we will write a program to create a new file that 
is a duplicate of an existing file. When the command line 

COPY FIRST SECOND 

is typed, CP/M will automatically set up the beginnings of two FCBs starting 
at 5C and 6C hex. Another program we will write compares two files. The 
command line will be as follows: 

VERIFY FIRST SECOND 

The programs we have written up to now require a single parameter. We 
have used an FCB at 5C hex for the file. However, when there are two 
parameters the situation is more complicated. 

CP/M has created the beginning of two FCBs starting at 5C hex and 
6C hex. However, if our program opens the first file at this point, the sec¬ 
ond file name will be destroyed. Remember, a complete FCB is 32 bytes 
long. The programmer constructs the first part of the FCB, and CP/M 
fills in the remainder when the file is actually opened. Thus, if the first 
FCB begins at address 5C hex, it will extend to address 7B hex after the 
open function is executed. The second half of the first FCB will overwrite 
the first part of the second FCB. 

You can investigate this problem with the debugger. Execute DDT or 
SID but do not provide a parameter. Then give the command 

ISTAT.COM 

as we did previously in this chapter. This command will initialize an FCB 
for STAT.COM at address 5C hex. The second FCB at address 6C hex is 
automatically filled with blanks because a second parameter was not 
given. Fill the second FCB area with the value of 40 hex, an ASCII @, by 
giving the command 

F6C,7F,40 

Observe the results with the command 
D50,7F 

The results should look like this: 

0050: EO D9 00 FF 00 FF 00 FF 00 FF 00 00 00 53 54 41 .STA 

0060: 54 20 20 20 20 43 4F 4D 00 00 00 00 40 40 40 40 T COM....3333 

0070: 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 40 333333333333333a) 

Notice that the at-signs coincide with the second FCB starting at 6C hex. 
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Using the debugger A command, write the following short program: 
A4000 

4000 LX I D,5C 
4003 AAV I C,0F 
4005 CALL 5 
4008 RST 7 

Execute this program with the command G4000. The program calls 
BDOS function 15 to open a disk file. After control returns to the debugger, 
display memory with the command 

D50,7F 

Notice that the asterisks in the second FCB are gone. The open operation 
destroyed the information in the second FCB. 

The solution to this problem is to relocate the second FCB before the 
first file name is opened. Macro SETUP2, given in Figure 7.5, is designed 
for this purpose. 

Macro SETUP2 expects to find two parameters in the program command 
line—one will be found at 5C hex and the other at 6C hex. For example, 
suppose we want to alter a file in some way. The first parameter gives the 
name of the existing file. The second parameter is the name of the new file. 
Macro SETUP2 will open the first file and create a directory entry for the 
second file. 

For some applications, it will be convenient for the user to enter only 
one parameter. For example, suppose we want to encrypt a file named 
PAYROLL. AUG. The encrypted file will be given the name of the original 
file and the original file will be named PAYROLL.BAK. 

Macro SETUP2 begins by setting flag S2FLAG true. Macro CLOSE, 
which we will write later in the chapter, uses this flag. The flag signals the 
assembler when generating macro CLOSE to look for the DUPL flag. 

Macro SETUP2 then checks to be sure that a second parameter was 
entered. If not, the first file name is duplicated into the second FCB at 
location 6C hex. Macro SETUP2 then checks for question marks in the 
second file name. Remember, question marks are used for ambiguous 
characters in the file name. If an asterisk is typed in a parameter, CP/M 
fills out the remainder of the field with question marks. Macro SETUP2 
uses macro AMBIG to replace question marks in the second parameter 
with the corresponding characters of the first parameter. 

The next step is to see whether the source and destination file names are 
identical. This of course includes the case where only one file name was 
originally given. In this case, the file type for the destination file is changed 
to $$$, the standard CP/M temporary file type. A duplicate-name flag, 
DUPL, is also set at this time. 
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SETUP2 AAACRO 
;;(Put current date here) 

;;lnline macro to open two disk files. 

;;lnput file is the first parameter of command 
;;line. The file control block is FCB1 at 5C hex. 

;;The output file is the second parameter. 

;;The file control block is initially FCB2 at 

;;6C hex. The destination file name is moved into 

;;the macro area. 

;;lf only one file is entered or both are the same, 
;;the second file is typed $$$. Macro CLOSE 
;;wi 11 rename original file BAK and give original 
;;name to the destination file when S2FLAG is true. 

••Other macros needed: MOVE, OPEN, AAAKE, DELETE, 
;; ERRORM, AMBIG, COMPAR 



LOCAL 

AROUND, SET2?, SET3?, SET4? 

S2FLAG 

SET 

TRUE 

;used by macro CLOSE 

' 

LDA 

FCB2 +1 

;second parameter 


CPI 

BLANK 

;anything? 


JNZ 

SET4? 


;duplicate file name and type, keep disk 

name 


MOVE 

FCB1+1, FCB2+1, 11 

;keep disk 

SET4?: 

AMBIG 

FCB1, FCB2 

;fix ??? in name? 


COMPAR 

FCB1, FCB2, 12 

;both same? 


JZ 

DUPNM? 

;yes 

SET2?: 

MOVE 

FCB2, DFCB, 16 

;new destination 


OPEN 

FCB1 

;source file 


OPEN 

DFCB, SET3? 

destination 

SET3?: 

DELETE 

DFCB 

;existing file name 


MAKE 

DFCB 

;new one 


JMP 

AROUND 

;error messages 


Figure 7.5: Macro SETUP2 to Handle Two Disk Files 
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DUPNM?: 


MVI 

A,TRUE 


STA 

DUPL 

;set dup flag 

MOVE 

'$$$', FCB2+9 

;source file 

JMP 

SET2? 

;continue 

/ 

DUPL: DB 

FALSE 

;duplicate-name flag 

;file control block for destination file 


DFCB: DS 

33 

;file 2 FCB 

AROUND: 


;continue main code 
;SETUP2 

ENDM 




Figure 7.5 (continued) 


Macro CLOSE will check the DUPL flag to see if only one file name 
was given or if identical names were given. In this case, macro CLOSE 
changes the file type of the first name to BAK. It also changes the file type 
of the second name from $$$ to the type of the first name. 

The second parameter is now moved from location 6C hex to a default 
file control block named DFCB, which is located within macro SETUP2. 
The directive DS (define storage) 33 sets aside 33 bytes for the FCB. Now 
that the way is clear, the first file name can be opened safely. Macro 
OPEN, which we wrote in the previous chapter, is used for this purpose. It 
will terminate the program and give the appropriate error message if the 
source file cannot be found. 

The next step is also very important. When we save a file with the CP/M 
command SAVE, any existing file with the same name is automatically 
erased. However, we are going to create a disk FCB from a memory FCB 
using BDOS function 22. In this case CP/M will allow us to create a disk 
file name that duplicates an existing file name. There would then be two 
identical names in the directory. So before you create a new disk FCB, you 
must ensure that another file with the same name does not exist. This is 
most easily accomplished by using the BDOS delete function. This step 
will delete the file name if it exists. If the name does not exist, no harm is 
done. (The delete command does not alter the memory FCB.) Macro 
SETUP2, therefore, deletes the file name given as the second parameter. 
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A MACRO TO RENAME A DISK FILE 

Each CP/M file is referenced by one or more FCB entries in the disk 
directory. We can change the name of a file by changing the FCB. BDOS 
function 23 is used for this purpose. This operation does not alter the file 
itself. It only changes the disk FCB. The programmer sets up the first 12 
bytes of a memory FCB for the original file name and then opens the file 
with BDOS function 15. A memory FCB for the new file name is placed 16 
bytes beyond the original name. The drive code for the original file name 
is the usual value, 0 for default, 1 for drive A, and so on, but the drive code 
for the new name is set to 0. If the FCB for the original file name is located 
at address 5C hex, the FCB for the new name is located at address 6C hex. 

The macro shown in Figure 7.6 can be used to rename a disk file. Add 
macro RENAME to your library. The parameter POINTR refers to the 
memory FCB for the original file name. The programmer must open the 
original file and then place a memory FCB for the new name 16 bytes 
beyond the original name. At this point, macro RENAME can be referenced. 
Notice that the new name must not be in place before the original file 
name is opened, or the new name will be destroyed by the open function. 

BDOS function 23 locates a disk FCB that matches the memory FCB 
referenced by POINTR. It then changes the disk FCB to match the memory 
FCB referenced by POINTR 4-16. 

Macro RENAME first checks to see whether the original file is pro¬ 
tected. If so, the file is unprotected with macro UNPROT. BDOS is then 
called to rename the file. Macro RENAME displays both file names on 
the console. A right-pointing arrow indicates that the original name was 
changed to the new name. For example, if SORT.ASM is renamed to 
SORT.BAK you will see the following statement on the console: 

SORT ASM = = > SORT BAK 


A MACRO TO WRITE A DISK SECTOR 

In Chapter 6 we wrote macro READS to read a sector from disk into 
memory. The sector is placed in the default buffer area starting at address 
80 hex, unless the DMA address has been redefined by BDOS function 26. 
The complementary operation, writing a disk sector from the console 
buffer, is similar. It is performed with BDOS function 21. The default 
memory location is again 80 hex unless it is changed by BDOS function 26. 

Add macro WRITES, given in Figure 7.7, to your macro library. There 
are two parameters to this macro, both of which are optional. The first 
parameter, POINTR, references the FCB where the file name is given. If 
this parameter is omitted, the macro assumes that DE has been previously 
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RENAME 

AAACRO 

POINTR 


;;(Put current date here) 



;;lnline macro to rename an existing disk file. 


;;POINTR refers to original 

name. 


;;New name is at POINTR + 10H. 

;;Macros needed: SYSF, PRINT, UNPROT, CRLF 


it 

LOCAL 

AROUND, REN2? 



LXI 

D, POINTR 



LDA 

POINTR+ 9 



ORI 

80H 

;;file R/O? 


JZ 

REN2? 

;;no 


UNPROT 

POINTR 

;;make R/W 

REN2?: 

CALL 

RENAM? 



CRLF 

PRINT 

POINTR +1, 11 



PRINT 

' ==>' 



PRINT 

POINTR+ 11H, 11 



IF 

NOT RNFLAG 



JMP 

AROUND 


RENAM?: 

SYSF 

23 

;rename file 

RNFLAG 

SET 

ENDIF 

TRUE 

;only one copy 

AROUND: 

ENDM 


-RENAME 


Figure 7.6: Macro RENAME to Rename a Disk File 


loaded with the FCB address. 

The second parameter, STAR, is the ASCII character to be printed on 
the console after each sector is written. This allows the user to follow the 
operation when several sectors are written. (As we learned from the op¬ 
eration of macro READS, printing a symbol after each sector is written 
greatly slows the process.) If there is no room on the disk, macro ERRORM 
prints the appropriate error message. 


A MACRO TO CLOSE A DISK FILE 

When a disk file is created, it is written sector by sector from the 
memory image. As each sector is written to the disk, the memory FCB is 
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WRITES AAACRO POINTR, STAR 
;;(Put current date here) 

"Inline macro to write a disk sector. 
;;POINTR refers to file control block. 

;;STAR is symbol to print for each sector. 
;;Macros needed: SYSF, PCHAR, ERRORM 


// 



LOCAL 

AROUND 


IF 

NOT NUL STAR 


PCHAR 

ENDIF 

STAR 


IF 

NOT NUL POINTR 


LXI 

ENDIF 

D,POINTR 


CALL 

WRIT2? 


ORA 

A ;set flag 


IF 

WRFLAG 


JNZ 

NROOM? 


ELSE 

;first time 

NROOM?: 

JZ 

AROUND ;ok 


ERRORM 

'No disk space', DONE 

/ 

WRIT2?: 

SYSF 

21 ;write disk sector 

WRFLAG 

SET 

TRUE ;only one copy 


ENDIF 

;; WRFLAG 

AROUND: 

ENDM 

-WRITES 


Figure 7.7: Macro WRITES to Write a Disk Sector 


updated to show where the sector is located. The disk FCB, however, is 
not altered at this time. After the final sector has been written, you must 
close the file with BDOS function 16. This action will update the disk FCB 
from the memory FCB. 

Macro CLOSE, shown in Figure 7.8, can be used to close a disk file. 
While this macro can be used by itself, it is also used in conjunction with 
macro SETUP2. In particular, if a source file name but no destination file 
name is given in the original command, macro CLOSE will take care of all 
the necessary details. For example, if the original file name is 


COPY. ASM 
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then macro SETUP2 creates the temporary file COPY.$$$. Macro 
CLOSE will delete the file COPY.BAK if it exists. Then it will rename 
COPY.ASM to COPY.BAK. Finally, COPY.$$$ will be renamed to 
COPY.ASM. 

Add macro CLOSE to your library. This macro references seven other 
macros: SYSF, ERRORM, OPEN, PRINT, MOVE, DELETE, and 
RENAME. 


CLOSE AAACRO POINTR 

;;(Put current date here) 

"Inline macro to close a new file. 

;;POINTR refers to file control block. 

;;lf file is not found, branch to DONE. 

;;lf S2FLAG from SETUP2 is true, check if 
"duplicate file name flag DUPL is set. Change 
"source file to BAK and new file to orig name. 
"Set S2FLAG false at beginning. 

"Usage: CLOSE DFCB 

/ / 

"Macros needed: SYSF, ERRORM, OPEN, 

;; PRINT, MOVE, DELETE, RENAME 


LOCAL 

AROUND, CLOSE3 

IF 

NOT NUL POINTR 

LXI 

D, POINTR 

ENDIF 


CALL 

CLOS2? 

INR 

A ;FF hex is error 

IF 

NOT S2FLAG ;SETUP2 macro 

JNZ 

AROUND ;ok 

ELSE 


JZ 

CLOS3? 

LDA 

DUPL ;duplicate name? 

ORA 

A 

JZ 

AROUND ;no 

MOVE 

'BAK', FCB1 + 10H+9 

MOVE 

FCB1 +9, DFCB+10H + 9, 3 

MOVE 

FCB1, FCB1+10H, 9 


Figure 7.8: Macro CLOSE to Close a Disk File 
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MOVE 

DFCB, DFCB+1 OH, 9 


DELETE 

FCB1+10H 

;BAK name if any 


RENAME 

FCB1 

;orig to BAK 


RENAME 

DFCB 

;$$$ to orig 


MOVE 

'BAK', FCB1 +9 

;restore 


OPEN 

FCB1 



JAAP 

ENDIF 

AROUND 

;S2FLAG 


IF 

NOT CLFLAG 

;one copy 

CLOS3?: 

ERRORM 

'?File not found?', 

DONE 

CLOS2?: 

SYSF 

16 

;close disk file 

CLFLAG 

SET 

TRUE 

;only one copy 


ENDIF 


;CLFLAG 

AROUND: 

ENDAA 


;;CLOSE 


Figure 7.8 (continued) 


DUPLICATING A DISK FILE 

We are ready to write a program for copying disk files. We have created 
an extensive macro library to make this task easier. This program is not in 
itself very useful, because the CP/M program PIP can be used for this 
purpose. Nevertheless, such a program will be a starting point for other 
useful programs, such as a program to encrypt a file. 

Our COPY program will expect two parameters on the command line—a 
source file and a destination file. For example, the command line might 
look like this: 

COPY FIRST SECOND 

Program COPY will then generate a new disk file called SECOND that is 
an exact copy of an existing file called FIRST. Notice that the command 
line is more natural than the one used by PIP. The source file name is 
given first, followed by the destination file name. Furthermore, there is 
no equal sign between the two file names. 

In Chapter 6 we saw that it is necessary to open an existing disk file 
before it can be accessed. We therefore will need an instruction to open 
the source file called FIRST. 

The destination file is handled differently from the source file. The pro¬ 
grammer must ensure that the file with the name SECOND does not exist 
on the disk. If it does exist, it must be erased. 
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If we look ahead to possible variations of our copy program, we will 
want to consider the possibility of a single parameter such as 

COPY FIRST.EXT 

In this example, the given file name is both the source file and the destina¬ 
tion file. A temporary destination file will be created to receive the result. 
At the conclusion of the program, the file type of the source file will be 
changed to BAK, and the temporary name given to the destination file 
will be changed to the original file name. 

Make a copy of the source program given in Figure 7.9. Give it the file 
name COPYS.ASM or COPYS.MAC, depending on your assembler 
(COPYS stands for copy sector). You might want to start with a copy of 
one of the programs from the last chapter, altering it to match Figure 7.9. 

Most of this program consists of definitions of symbols and flags. The 
actual instructions and macros occupy only the last dozen or so lines of the 
program. Assemble the program and try it out. Use COPY to duplicate its 
own source program, using STAT first to ensure that there is sufficient 
space on the diskette. Give the command 

COPYS COPYS.ASM CRYPT. * 

Look at the new copy by using SHOW, which we wrote in Chapter 6, or 
use the CP/M command TYPE. Do not erase this copy; we will use it in 
the next section. 

When COPYS is executed, it reads one sector (128 bytes) into memory 
and prints an * symbol. It then writes that sector to the new disk file and 
prints a # symbol. These two symbols will be printed alternately across the 
console, giving you a report on the progress. Alternately reading and 
writing a single sector is an inefficient way to make a copy, but it does have 
one advantage—the size of the file is not limited by the available memory 
space. It would be faster to read the entire source file, then write the entire 
new file. We will consider this method shortly. 

We have incorporated the macro ABORT, so you can interrupt the copy¬ 
ing process at any point by pressing the escape key. The new file will not be 
created in this case. There will be a directory entry, but it will be empty 
because the program did not perform the close function. 

ENCRYPTING AN ASCII FILE 

With a few modifications to the copy program we just wrote, we can 
convert it to an encrypting (coding) program. Such a program can be very 
useful. For example, if you have a computer in a public place, you may 
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TITLE 'Copy file sector by sector' 

/ 

;(Put current date here) 


/ 

;Usage: COPYS 

SOURCE DESTINATION 

FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 

/ 

BOOT 

EQU 

0 


BDOS 

EQU 

5 

;BDOS entry point 

TPA 

EQU 

100H 


/ 

FCB1 

EQU 

5CH 

;first file name 

FCB2 

EQU 

6CH 

;second file name 

DBUFF 

EQU 

80H 

;default buffer 

/ 

;Set flags 

in main program so only one 

;copy of certain subroutines will be generated. 

;Place set lines before MACLIB call. 

CIFLAG 

SET 

FALSE 

;input console char 

CLFLAG 

SET 

FALSE 

;close disk file 

CMFLAG 

SET 

FALSE 

;compare 

COFLAG 

SET 

FALSE 

;output console char 

CRFLAG 

SET 

FALSE 

;carr-ret/l i ne-f eed 

DEFLAG 

SET 

FALSE 

/delete disk file 

MKFLAG 

SET 

FALSE 

/create new disk file 

MVFLAG 

SET 

FALSE 

/block move 

OPFLAG 

SET 

FALSE 

/open disk file 

PRFLAG 

SET 

FALSE 

/print console 

RDFLAG 

SET 

FALSE 

/read disk sector 

RNFLAG 

SET 

FALSE 

/rename disk file 

S2FLAG 

SET 

FALSE 

/SETUP2 macro 

UNFLAG 

SET 

FALSE 

/unprotect 

WRFLAG 

SET 

FALSE 

/write disk sector 

;end of flags 

/ 




Figure 7.9: Program COPYS to Duplicate a Disk File 
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AAACLIB 

CPMMAC 


ORG 

TPA 



START: 





ENTER 




VERSN 

'(current date).COPYS' 


SETUP2 


;input and output files 

COPY: 



;file 1 to file 2 


READS 

FCBl/*' 

;read a sector 


JNZ 

EOFILE 

;done 


ABORT 

ESC 

/‘quit? 


WRITES 

DFCB/#' 

;write new sector 


JMP 

COPY 

;yes, next sector 

EOF HE: 





CLOSE 

DFCB 

;destination file 

DONE: 





EXIT 




END 

START 



Figure 7.9 (continued) 

want to ensure the privacy of certain files (such as those dealing with 
payroll or other personnel matters). If these files are coded, they cannot 
be inspected by someone who does not know how to decode them. 

Use the copy of the source program we made in the previous section, 
and give the new copy the file name CRYPT. ASM or CRYPT.MAC. Alter 
the program to look like that in Figure 7.10. 

Near the beginning of the instructions we add a reference to macro 
GFNAME. This will ask the user for a file name if none was entered on the 
command line. Macro SETUP2 prepares two memory FCBs using the pa¬ 
rameters given on the command line. Then macros PRINT and READCH 
are used to request the encrypting key. This can be any keyboard character. 

One sector of the source file is read into memory. Then each byte of the 
sector is coded by performing an exclusive OR with the desired key. This 
converts the file into an unreadable form. The advantage of the exclusive 
OR operation is the ease of decoding. A second exclusive OR operation, 
using the same coding key, returns the byte to its original form. Thus the 
encrypting program is also the decrypting program. 

After each byte of a sector is coded (or decoded), the sector is written 
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TITLE 

'Encrypt file with XOR' 


/ 

;Feb 8.0, 1982 



/ 

;Usage: CRYPT SOURCE DESTINATION 

FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


/ 

BOOT 

EQU 

0 


BDOS 

EQU 

5 

;BDOS entry point 

TPA 

EQU 

100H 


FCB1 

EQU 

5CH 

;first file name 

FCB2 

EQU 

6CH 

;second file name 

DBUFF 

EQU 

80H 

/default buffer 

/ 

;Set flags in main program so only one 

;copy of certain subroutines will be generated. 

;Place set lines before AAACLIB call. 


/ 

Cl FLAG 

SET 

FALSE 

/input console char 

CLFLAG 

SET 

FALSE 

/close disk file 

CMFLAG 

SET 

FALSE 

/compare 

COFLAG 

SET 

FALSE 

/output console char 

CRFLAG 

SET 

FALSE 

;carr-ret/line-feed 

DEFLAG 

SET 

FALSE 

/delete disk file 

FLFLAG 

SET 

FALSE 

/fill characters 

FNFLAG 

SET 

FALSE 

/read file name 

MKFLAG 

SET 

FALSE 

/create new disk file 

MVFLAG 

SET 

FALSE 

/block move 

OPFLAG 

SET 

FALSE 

/open disk file 

PRFLAG 

SET 

FALSE 

/print console 

RCFLAG 

SET 

FALSE 

/read console 

RDFLAG 

SET 

FALSE 

/read disk sector 

RNFLAG 

SET 

FALSE 

/rename disk file 

S2FLAG 

SET 

FALSE 

/SETUP2 macro 

UNFLAG 

SET 

FALSE 

/set file attributes 

WRFLAG 

SET 

FALSE 

/write disk sector 


Figure 7.10: Program CR YPT to Encrypt a File with the XOR Operation 















234 MASTERING CP/M 


;end of flags 



AAACLIB 

CPMAAAC 


ORG TPA 



START: 



ENTER 



VERSN 

'2.08.82. CRYPT' 

LDA 

FCB1-H 


CPI 

BLANK 

;first file name? 

JNZ 

FIRN 

;yes 

GFNAME 

FCBl 

;get file name 

FIRN: 



SETUP2 


;input and output files 

;get encrypting character from console 

PRINT 

<CR,LF/ Press ESC to abort',CR, IF, LF> 

PRINT 

'Input one letter for encoding key:' 

READCH 


;console char 

ANI 

7FH 

;strip parity 

CPI 

ESC 


JZ 

DONE 


STA 

KEY 

;save 

CRLF 



COPY: 


;file 1 to file 2 

READS 

FCBl/*' 

;read a sector 

JNZ 

EOFILE 

;done 

ABORT 

ESC 

;quit? 

/ 

;perform XOR with key for each byte 
;HL is pointer to sector buffer 


PUSH 

H 

;save pointer 

LXI 

H,DBUFF 

;disk buffer 

LDA 

KEY 

;get it 

MOV 

B,A 

;save in B 


Figure 7.10 (continued) 
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MVI 

C,80H 

;sector length 

CODE: 





MOV 

A,M 

;get byte 


XRA 

B 

;XOR with key 


MOV 

M, A 

;put byte back 


INX 

H 

increment pointer 


DCR 

C 

;count 


JNZ 

CODE 

;keep going 


POP 

H 

;restore 


WRITES 

DFCB/r 

;write new sector 


JMP 

COPY 

;next sector 

EOFILE: 





CLOSE 

DFCB 

/destination file 


PRINT 

<CR,LF/ Delete original file? '> 


READCH 




UCASE 




CPI 

'Y' 



JNZ 

DONE 



DELETE 

FCB1 

/gone 

DONE: 





EXIT 



/ 

KEY: 

DS 

1 . 

/encrypting key 

/ 

END 

START 



Figure 7.10 (continued) 


to the destination file. Another sector is then read from the source file. 
The program continues in this way until the entire file has been coded or 
until the escape key is pressed, aborting the program. 

If only one file name was entered at the beginning of the program, the 
new file is given the original file name and the file type of the source file is 
changed to BAK. At the conclusion of the program, the user is given the 
option of deleting the original file. 

Encrypt a copy of the source file using the letter M. Give the coded 
copy the file name CRYPT.COD. The execution will be faster if the new 
copy is on a different drive. For example: 

CRYPT CRYPT.ASM B:*.COD 
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Be careful not to delete the original file, although if you do, you can 
regenerate it by running CRYPT again and giving the same encrypting 
character: 

CRYPT B:CRYPT.COD *.ASM 

If you examine the coded file with SHOW or the CP/M TYPE command, 
the console screen will be filled with meaningless information. However, 
you can use the program DUMP, which we wrote in Chapter 6, to study 
the result. For example, the command DUMP B:CRYPT.COD will give 
you something like this: 


Space bar for next screen, <CR> next line, 
0100 39243921 28446A08 232E3F34 3D396D2B 
0110 2421286D 3A243925 6D15021F 6A404776 
0120 4047766D 0B282F6D 6D75637D 616D7C74 
0130 757F4047 76404776 6D183E2C 2A28776D 
0140 08030E1F 141D196D 6D1E0218 1F0E086D 
0150 6D09081E 1904030C 19040203 40477640 
0160 472B2C21 3E284428 3C38447D 4047393F 
0170 38284428 3C384423 22396D2B 2C213E28 
0180 40477640 472F2222 3944283C 38447D40 


<ESC> to abort 
9S9!(Dj.#.?4=9m+ 
$!(m:$9%m...j3Gv 
3Gvm.(/mmuc>am|t 
u.3Gv3Gvm.^,*(wm 

.mm.m 

m.3G v3 

G+,!>(D(<8D>3G9? 
8(D (<8D#"9m+,!>( 
aGvaG/""9D(<8D>a 


On the other hand, if you examine the original file with the command 
DUMP CRYPT. ASM, you will see the following: 


Space bar for next screen, <CR> next line, 
0100 5449544C 45092745 6E637279 70742066 
0110 696C6520 77697468 20584F52 270D0A3B 
0120 0D0A3B20 46656220 20382E30 2C203139 
0130 38320D0A 3B0D0A3B 20557361 67653A20 
0140 454E4352 59505420 20534F55 52434520 
0150 20444553 54494E41 54494F4E 0D0A3B0D 
0160 0A46414C 53450945 51550930 0D0A5452 
0170 55450945 5155094E 4F542046 414C5345 
0180 0D0A3B0D 0A424F4F 54094551 5509300D 


<ESC> to abort 
TITLE.'Encrypt f 
ile with XOR 1 ..; 

Feb 8.0, 19 
82 Usage: 

ENCRYPT SOURCE 
DESTINATION..;. 
.FALSE.EQU.0..TR 
UE.EQU.NOT FALSE 
..;..BOOT.EQU.0. 


Examining the ASCII representation of the coded file, you can see that 
the lowercase letter m appears frequently. Remember that the uppercase 
letter M was used as the encrypting key. Obviously, it would not be too 
difficult to discover the encrypting character by studying the coded file. 

If a more secure encryptation is desired, the process can be repeated 
using a different key. For example, encrypt the coded file a second time 
with the uppercase letter A. Give the command CRYPT CRYPT.COD. 
Look at the result with the command 


ArDUMP CRYPT.COD 
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The result now will be as follows: 


Space bar for next screen, <CR> next line, 
0100 78657860 69052B49 626F7E75 7C782C6A 
0110 6560692C 7B657864 2C54435E 2B010637 
0120 0106372C 4A696E2C 2C34223C 202C3D35 
0130 343E0106 37010637 2C597F6D 6B69362C 
0140 49424F5E 555C582C 2C5F4359 5E4F492C 
0150 2C48495F 5845424D 58454342 01063701 
0160 066A6D60 7F690569 7D79053C 0106787E 
0170 79690569 70790562 63782C6A 6D607F69 
0180 01063701 066E6363 78056970 79053C01 


<ESC> to abort 
xex*i, + Ibo~u| x,j 
e’ i ,{exd,TC'*+. .7 
^ 5 

4>..7.,7 / Y.mki6, 
IB(TU\X,,j:Y'‘OI / 
,HI_XEBMXECB..7. 
.jm*.i.i>y.<„.x 
yi .i}y.bcx,jm‘.i 
..7..nccx.i>y.<. 


This file was first coded with the letter M, then it was coded a second time 
with the letter A. Neither of these characters is prominent in the ASCII 
representation. This file must be decoded twice, once with the letter M and 
once with the letter A. However, it does not matter which key is given first. 

When you encrypt a file by giving only the source file name, for example, 
CRYPT.COD, the program fully demonstrates its operation. At the end 
of the process there will still be only one file with this name. During opera¬ 
tion the console will display the following lines: 


Press ESC to abort 

Input one letter for encoding key: M 
*#*#*#*#*#*#*#*#*#*#*#*#♦#*#*#* 

CRYPT COD = => CRYPT BAK 
CRYPT $$$==> CRYPT COD 
Delete original file? y 

Both CRYPT from this section and COPY from the previous section 
print an interlaced sequence of * and # symbols as the file sectors are being 
read or written. Because the printing of these characters is very time con¬ 
suming for larger files, you may want to remove the second parameter 
from macro READS and WRITES after you become familiar with the 
operation of these programs. That is, change 



READS 

FCB1 

;read a sector 

to 

READS 

and change 

FCB1 

;read a sector 


WRITES 

DFCB/r 

;write new sector 

to 


WRITES 

DFCB 

;write new sector 


We will now consider a more efficient way to read a disk file. 
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COPYING A FILE BY BUFFERING INTO MEMORY 

The COPY and CRYPT programs we just wrote use macro READS to 
read one disk sector and macro WRITES to write one disk sector. Alter¬ 
nately reading and writing one sector at a time is an easy way to program 
disk operations, and it does not require a large amount of memory. 
However, a disk file can be copied more rapidly if the entire file is read into 
memory at one time. A new file is then written from memory all at once. 
The disadvantage of this technique is that very large files cannot be loaded 
into memory, at least not all at once. However, this limitation is not 
serious. Most commercial executable programs are small enough to fit into 
a moderately sized memory. Furthermore, it is better to limit text files to a 
size that will fit into memory, as this will speed up the editing process. 

To enable us to copy files more efficiently, we must add two macros to 
our library. One will read an entire disk file into memory at once, and the 
other will perform the complementary operation—it will write an entire 
disk file from a memory image. 

Reading an Entire File into Memory 

Macro LDFILE, shown in Figure 7.11, is used to read a disk file into 
memory. Add it to your macro library. This macro has three parameters. 
The first parameter gives the location of the memory FCB for the file 
to be read. The second parameter is the pointer to the memory image of 
the file itself. The third parameter is the character to be displayed on the 
console as each sector is read. 

It appears that the first parameter, FCB, is required, but in fact it is not. 
This parameter is simply passed along to macro READS. If the actual 
parameter is omitted, macro READS will assume that the DE register is 
already loaded with the address of the FCB. 

The second parameter to macro LDFILE is required, but you can rewrite 
the macro to make it optional. The optional third parameter is also passed 
along to macro READS. If it is omitted, no character is displayed while 
the sectors are being read. 


LDFILE MACRO FCB, POINTR, CHAR 
;;(Put current date here) 

;;lnline macro to load a disk file into 
;;memory starting at POINTR. 


Figure 7.11: Macro LDFILE to Read an Entire File into Memory 
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;;POINTR initially points to memory buffer. 
;;Place buffer at end of program. 

;;HL points to end of loaded program. 
;;Optional 3rd parameter is printed after 
;;each sector is read. 

;;CCP area may be overlaid but 
;;FDOS is protected. 

;;Carry flag is set if file is too big. 

;;DMA address is reset to 80H on exit. 
;;AAacros needed: SETDMA, READS 




;; Usage: 

LDFILE 

FCBl, DBUFFP, 

/ / 

LDFILE 

FCBl, BUFFP 


/ / 

LOAD2?: 





LHLD 

POINTR 



XCHG 


;move to DE 


SETDMA 


;set next sector 


READS 

FCB, CHAR 



JNZ 

LOAD3? 

;done if nonzero 


LHLD 

POINTR 



LXI 

D,80H 

;one sector 


DAD 

D 

;DE has pointer 


SHLD 

POINTR 

;save pointer 

! 

;see if file is entering CCP area 



LDA 

7 

;FDOS 


SUI 

2 

;2 blocks down 


CMP 

H 

;file too big? 


JNC 

LOAD2? 

;no keep going 

LOAD3?: 



;done 


PUSH 

PSW 



SETDMA 

80H 

; reset 


POP 

PSW 





;; LDFILE 


ENDM 




Figure 7.11 (continued) 
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Macros SETDMA and READS are needed by macro LDFILE. We have 
learned that CP/M reads disk sectors into a memory region designated by 
the DMA address, and that this location is automatically reset to the value 
of 80 hex each time a warm start is performed. We used this location in the 
two previous programs. We also learned that the DMA address can be set 
to any desired memory location with BDOS function 26. 

A program that uses macro LDFILE will set up the memory buffer at 
the end of the program. Macro LDFILE initially sets the DMA address to 
the beginning of this buffer. After each sector is read into memory, macro 
LDFILE advances the DMA address by 80 hex, the length of a sector. In 
this way, the entire file will be read sequentially into memory. At the end 
of the load step, macro LDFILE resets the DMA address to the usual 
value of 80 hex. 

Most of the executable programs we have written save the incoming 
stack pointer and set up a new one. At the conclusion of the program, the 
original stack pointer is restored and a return instruction is executed. This 
approach is faster than performing a warm start when the program is 
finished. However, a different method must be used for larger programs. 
Large executable programs can use the memory space occupied by the 
console command processor (CCP). In this case, however, a warm start 
must be performed when the program is finished. This will reload the 
CCP and the BDOS. We use this technique whenever we need macro 
LDFILE, because it may have to overlay the CCP. 

The address for the beginning of BDOS is coded at memory locations 6 
and 7. For example, BDOS begins at the address 3C00 hex for a 20K-byte 
system; for a 64K system BDOS starts at FA00 hex. Thus, any executable 
program can determine the size of the CP/M that is currently being used. 
Macro LDFILE reads the high-order byte of the BDOS address at location 7. 
This value is compared to the high-order byte of the pointer as each sector 
of the file is read into memory. Macro LDFILE will allow the CCP to be 
overwritten, but it will protect the remainder of the CP/M system. 

If a file is so large that is begins to overlay the BDOS, macro LDFILE 
will stop reading the file and set the carry flag. No error message is 
printed, however, so the programmer must test the state of the carry flag 
after the file has been loaded to see if the file is too large. We will now con¬ 
sider the complementary macro WRFILE. 


Writing an Entire File from Memory 

Macro WRFILE, shown in Figure 7.12, is similar to macro LDFILE. 
The three parameters are the same as those for macro LDFILE. Add this 
macro to your library. 
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WRFILE AAACRO 

FCB, POINTR, STAR 

;;(Put current date here) 


"Inline macro to write a disk file from 


;;a memory image. Buffer starts at POINTR + 2. 

;;POINTR marks end of file. 


"Optional star symbol is printed for each sector. 

;;Macros needed: WRITES, SBC, SETDAAA, ERRORM 

/ / 

LOCAL 

WRFIL?,EVEN? 


LHLD 

POINTR 

;end 

XCHG 


;to DE 

LXI 

H, POINTR+ 2 

;start 

SHLD 

POINTR 

;reset 

XCHG 



SBC 

HL,DE 

;program length 

MOV 

A,L 


MOV 

L,H 

;just upper part 

MVI 

H,0 


DAD 

H 

;double = # sectors 

ORA 

A 

;odd # of sectors? 

JZ 

EVEN? 

;no 

INX 

H 


EVEN?: 



PUSH 

B 


MOV 

B,H 


MOV 

C,L 


WRFIL?: 



LHLD 

POINTR 


XCHG 


;move to DE 

SETDMA 


;next sector 

WRITES 

FCB, STAR 


LHLD 

POINTR 


LXI 

D,80H 

;one sector 

DAD 

D 

;next location 

SHLD 

POINTR 


DCX 

B 

;number of sectors 

MOV 

A,C 



Figure 7.12: Macro WRFILE to Write an Entire File from Memory 
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ORA 

B 


JNZ 

WRFIL? 


POP 

B 

;;WRFILE 

ENDM 




Figure 7.12 (continued) 


After macro LDFILE has loaded a file into memory, the pointer will 
reference the end of the memory image of the file. Macro WRFILE begins 
by copying this pointer to the DE register. The pointer is then reset to the 
beginning of the memory image. The length of the file is computed by sub¬ 
tracting the address of the beginning of the file from the address at the 
end. Macro SBC is used for the 16-bit subtraction. 

The Copy Program, Version 2 

The program shown in Figure 7.13 uses macros LDFILE and WRFILE 
to copy disk files more rapidly. Duplicate the copy program in Figure 7.9 
(COPYS), giving the new version the file name COPYB (for buffered 
copy). The command is as follows: 

COPYS COPYS.ASM COPYB.* 

Alter the new version to look like Figure 7.13. Assemble the program and 
execute it. Test COPYB by using it to make a copy of itself. 

You will find that this version runs much faster than the previous one, 
which copies one sector at a time. A further increase in speed will occur if 
you remove the * and # symbols from macros 

LDFILE FCB1,BUFFP/*' 

and 

WRFILE DFCB,BUFFP/r 

Macro LDFILE is programmed to terminate reading if a disk file is too 
large. You can test this feature in the following way. Create a very large 
file by giving the command 

SAVE 220 DUMMY 

(The information we are saving is simply the contents of memory.) Be sure 
that there is enough room on the disk (about 55K bytes). Try to copy this 
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file with the command 

COPYB DUMMY 

The copy program will begin to read the file, but it should terminate with 
the error message 

?File too big 


TITLE 

'Copy file with buffer' 


/ 

;(Put current date here) 


/ 

;Usage: COPYB SOURCE DESTINATION 


/ 

FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

EQU 

0 


BDOS 

EQU 

5 

;BDOS entry point 

TPA 

EQU 

100H 


FCB1 

EQU 

5CH 

;first file name 

FCB2 

EQU 

6CH 

/second file name 

DBUFF 

EQU 

80H 

/default buffer 

/ 

;Set flags in main 

program so only one 


;copy of certain subroutines will be generated. 

;Place set lines before AAACLIB call. 


r 

Cl FLAG 

SET 

FALSE 

/input console char 

CLFLAG 

SET 

FALSE 

/close disk file 

CMFLAG 

SET 

FALSE 

/compare 

COFLAG 

SET 

FALSE 

/output console char 

CRFLAG 

SET 

FALSE 

/carr-ret/line-feed 

DEFLAG 

SET 

FALSE 

/delete disk file 

DMFLAG 

SET 

FALSE 

/set DMA address 

MKFLAG 

SET 

FALSE 

/create new disk file 


Rgure 7.13: Program COPYB to Copy a Disk File by Buffering in Memory 
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MVFLAG 

SET 

FALSE 

;block move 

OPFLAG 

SET 

FALSE 

;open disk file 

PRFLAG 

SET 

FALSE 

;print console 

RDFLAG 

SET 

FALSE 

;read disk sector 

RNFLAG 

SET 

FALSE 

;rename disk file 

S2FLAG 

SET 

FALSE 

;SETUP2 macro 

UNFLAG 

SET 

FALSE 

; un protect 

WRFLAG 

SET 

FALSE 

;write disk sector 

;end of flags 



/ 

/ 

AAACLIB 

CPAAAAAC 


ORG 

TPA 



START: 





ENTER 




VERSN 

'(current date).COPYB' 


SETUP2 


;input and output files 


LDFILE 

FCB1,BUFFP/*' 



JNC 

EOFILE 

;file ok 


ERRORM 

<CR,LF,'?Filetoo big'> 

EOFILE: 





LHLD 

BUFFP 

;pointer 


MVI 

M,EOF 

;just in case 


ABORT 

ESC 



WRFILE 

DFCB, BUFFP/#' 



CLOSE 

DFCB 

destination file 

DONE: 





JAAP 

BOOT 

;warm start 

OLDSTK: 

DS 

2 



DS 

34 


STACK: 




BUFFP: 

DW 

BUFFER 


BUFFER: 

DS 

1 


/ 

END 

START 



Figure 7.13 (continued) 
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A BUFFERED COPY PROGRAM 
WITH VERIFICATION 

Our copy program needs two more features before we can begin to use 
it seriously. After we make a copy of a file, we should read back the new 
file to verify that it was written correctly. We should also be able to 
designate that the new file is write protected if the original file was. 


Comparing Two Disk Files 

Before we add the verification feature to the copy program, we will 
write another executable program. Make a duplicate of the previous program 
and give it the name VERIFY. Alter the text to look like Figure 7.14. 


TITLE 

'VERIFY two files' 


/ 

;(Put current date here) 


/ 

;Usage: 

VERIFY SOURCE DESTINATION 


FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

EQU 

0 


BDOS 

EQU 

5 

;BDOS entry point 

TPA 

EQU 

100H 


FCB1 

EQU 

5CH 

;first file name 

FCB2 

EQU 

6CH 

;second file name 

DBUFF 

EQU 

80H 

/•default buffer 

;Set flags In main 

program so only one 


;copy of certain subroutines will be generated. 

;Place set lines before AAACLIB call. 


Cl FLAG 

SET 

FALSE 

;input console char 

CMFLAG 

SET 

FALSE 

/•compare 

COFLAG 

SET 

FALSE 

/•output console char 

CRFLAG 

SET 

FALSE 

;carr-ret/line-feed 


Figure 7.14: Program VERIFY to Verify That Two Disk Files Are Identical 
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DMFLAG 

SET 

FALSE 

;set DMA address 

MVFLAG 

SET 

FALSE 

;block move 

OPFLAG 

SET 

FALSE 

;open disk file 

PRFLAG 

SET 

FALSE 

;print console 

RDFLAG 

SET 

FALSE 

;read disk sector 

rend of flags 




AAACLIB 

CPMAAAC 


ORG 

TPA 



START: 





EOFILE: 


NSECT: 


DONE2: 


ENTER 

VERSN 

'(current date).VERIFY' 

LDA 

FCB2-f 1 ;second parameter 

CPI 

BLANK 

JZ 

NOSEC 

AMBIG 

FCB1,FCB2 

MOVE 

FCB2,DFCB,16 destination 

OPEN 

FCB1 

OPEN 

DFCB 

LDFILE 

FCB1,BUFFP 

JNC 

EOFILE ;file ok 

ERRORM 

<CR,LF,'?File too big'> 

LHLD 

BUFFP ;pointer 

MVI 

M,EOF ;just in case 

LXI 

H, BUFFER 

ABORT 

ESC 

READS 

DFCB 

ORA 

A ;zero means more 

JNZ 

DONE2 

COMPAR 

,DBUFF,128 ;one sector 

JNZ 

DIFFER 

LXI 

D,80H 

DAD 

D ;next sector 

JMP 

NSECT 

PRINT 

<CR,LF,'Files are identical'> 


Figure 7.14 (continued) 
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DONE: 

JMP 

BOOT ;warm start 

NOSEC: 

ERRORM 

<CR,LF/?Second file omitted'> 

DIFFER: 



ERRORM 

<CR ( LF,'?Files are different^ 

OLDSTK: 

DS 

2 


DS 

34 

STACK: 

DFCB: 

DS 

33 /second file 

BUFFP: 

DW 

BUFFER 

BUFFER: 

DS 

1 

/ 

END 

START 


Figure 7.14 (continued) 


Assemble the program and try it out. The command line looks like the one 
tor the copy program except that both parameters are source files. For 
this program the order of the parameters is immaterial. Give a command 
in which both parameters are the same: 


VERIFY VERIFY.ASM VERIFY.ASM 
You should get the statement 


Files are identical 

Then give file names for files that are different: 

VERIFY VERIFY.ASM VERIFY.COM 
You will get the message 

?Files are different 


When this program is executed, the first file is read into memory. The 
second file is then read into the default buffer at 80 hex, one sector at a 
‘™. e h 7 f he ^ 0 ^then compares this sector with the corresponding sector 
of the first file. Thus the TPA is used only by the first file. 

rhI he , aSteri i 3nd qu f stion mark symbols can be used as ambiguous 
characters in the second file name. For example, the following command 


VERIFY VERIFY.ASM *.BAK 
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A Macro to Protect Disk Files 

You may have noticed that if our copy program is used to duplicate a 
write-protected file, the copy is not write protected. That is, the new file is 
not designated as read only. We are going to fix this problem for he next 
version, so that the new file will have the same protection attribute as the 

OT Maao f PROTEC, given in Figure 7.15, can be used to P r otect adisk file 
using BDOS function 30. We previously wrote macro UNPROT to un- 
protect a disk file using the same BDOS function 30. Recall that the ig^ 
order bit of the first character of the file type specifies the protec 
attribute. If this bit is set, the file is protected. If this bit is reset, the file 
can be altered or erased. Add macro PROTEC to your library. 

The Copy Program, Version 3 

Our final version of the copy program will read the entire source file into 
memory. It will then write the new file from this memory image. The new 
copy is verified by reading the new file sector by sector and comparing 
each sector to the memory image. If a difference is found, the program 


PROTEC AAACRO 

POINTR 


;;(Put current date here) 

••Inline macro to protect 

FCB at POINTR. 


;;AAacro needed: SYSF 

LOCAL 

AROUND, PROT2? 


LXI 

D, POINTR 


LDA 

POINTR+9 

"extension 

ORI 

80H 

;;set for R/O 

STA 

POINTR+9 


CALL 

PROT2? 


JAAP 

AROUND 


PROT2?: 

SYSF 

30 


AROUND: 


;; PROTEC 

ENDM 


Figure 


7.15: Macro PROTEC to Protect a Disk File 
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terminates and the error message 
?Files are different 

is displayed on the console. The console bell also sounds 
This version of the copy program also transfers the protection attribute 
of the source file to the destination file. The memory FCB of "he source 

* ; S H r ked t0 See whether the fl,e is protected. If it is, instructions 
created by macro PROTEC set the protection attribute of Ihe newt" 

Make a copy of program COPYB. Give it the name COP YV (copy with 

ScSvto JJTST VERIFY t0 ensure that the copy is correct - 

Alter COPYV to look like Figure 7.16. Assemble the program and try it out 


TITLE 

'COPY and verify file' 


;(Put current date here) 


/ 

;Usage: 

COPYV SOURCE DESTINATION 


FALSE 

TRUE 

EQU 

EQU 

0 

NOT FALSE 


BOOT 

BDOS 

TPA 

EQU 

EQU 

EQU 

0 

5 

100H 

;BDOS entry point 

FCB1 

FCB2 

DBUFF 

BEL 

EQU 

EQU 

EQU 

EQU 

5CH 

6CH 

80H 

7 

/first file name 
/second file name 
/default buffer 

/ 

;Set flags in main program so only one 
;copy of certain subroutines will be generated 
;Place set lines before AAACLIB call. 

/ 

CIFLAG 

CLFLAG 

SET 

SET 

FALSE 

FALSE 

/input console char 
/close disk file 


Figure 7.16: Program COPYV to Copy Disk Files with Verification 










CMFLAG SET FALSE 

COFLAG SET FALSE 

CRFLAG SET FALSE 

DEFLAG SET FALSE 

DMFLAG SET FALSE 

MKFLAG SET FALSE 

MVFLAG SET FALSE 

OPFLAG SET FALSE 

PRFLAG SET FALSE 

RDFLAG SET FALSE 

RNFLAG SET FALSE 

S2FLAG SET FALSE 

UNFLAG SET FALSE 

WRFLAG SET FALSE 

;end of flags 

AAACLIB CPMAAAC 


;compare 

;output console char 
;carr-ret/l i ne-f eed 
;delete disk file 
;set DAAA address 
;create new disk file 
;block move 
;open disk file 
,‘print console 
;read disk sector 
;rename disk file 
;SETUP2 macro 
,-unprotect 
;write disk sector 


ORG 

START: 


EOFILE: 


TPA 


ENTER 

VERSN 

SETUP2 

LDA 

ANI 

STA 

LDFILE 

JNC 

ERRORM 

LHLD 

MVI 

ABORT 

WRFILE 

CLOSE 


'(current date).COPYV' 

;input and output 


FCB1 +9 
80H 
PROTFL 
FCB1,BUFFP 
EOFILE 


(•protected 
protection flag 

;file ok 


<CR,LF,'?File too big'> 


BUFFP 

M,EOF 

ESC 

DFCB, BUFFP 
DFCB 


;verify 


that file is identical with original 
OPEN DFCB 

i XI H, BUFFER 


(•pointer 
;just in case 


destination file 


Figure 7.16 (continued) 
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SETDMA 

DBUFF 


NSECT: 


ABORT 

READS 

ESC 

DFCB 



ORA 

JNZ 

A 

DONE2 

;zero means more 


COMPAR 

JNZ 

LXI 

, DBUFF, 128 
DIFFER 

D,80H 

;one sector 


DAD 

JMP 

D 

NSECT 

;next sector 

DONE2: 


LDA 

ORA 

PROTFL 

A 

protected? 


JZ 

PROTEC 

DONE 

DFCB 

;no 

DONE: 


JMP 

BOOT 

;warm start 

DIFFER: 

PROTFL: 

OLDSTK: 

ERRORM 

<BEL/?Files are different'> 

DS 

DS 

DS 

1 

2 

34 

/protection flag 

STACK: 

BUFFP: 

DW 

BUFFER 


BUFFER: 

DS 

1 


/ 

END 

START 



Figure 7.16 (continued) 


A PROGRAM TO RENAME DISK FILES 

Disk files can be renamed with the CP/M built-in command REN. 
However, ambiguous file names are not allowed in this command. Thus 
i you want to change all BASIC files to backup status, that is, if you want 

“ from BAS '° BAK ' you mus '»— 
The program shown in Figure 7.17 can be used to rename CP/M disk 
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files, either individually or in groups. The command line is similar to the 
other programs in this chapter. For example, the command 

RENAME OLDNAME NEWNAME 

changes the name of OLDNAME to NEWNAME. If a file with the new 
name already exists, the program asks for permission to delete it. Furthe 
more, if this file is write protected, additional permission is requested to 
unprotect it before deletion. 

The usefulness of this program lies in its ability to rename several fi e 
with a single command. For example, the command 

RENAME *.BAS *.BAK 

will change the file type of all BASIC files to BAK. If you discover an error 
in the command, you can terminate the operation by pressing the escape key. 

A single RENAME command can combine a delete operation wit 
renaming step. For example, if you want to delete the backup copy and 
rename the main copy as the backup copy, you can give the following two 
CP/M commands: 

ERA AAAIN.BAK 

REN AAAIN.BAK=AAAIN.ASM 

However, the same result can be obtained with a single command using 
our RENAME program. Give the command 

RENAME AAAIN.ASM *.BAK 

Of course, RENAME will request permission to delete the program 

M Becausemacro RENAME is used by this program, each renaming step 
is indicated graphically by right-pointing arrows. An open operationis 
performed on the original file name to ensure that the name exists. T e 
an open operation is performed on the new file name to see whether that 
name is in use. After each file is renamed, an open operation is performed 
to locate the next occurrence of the requested file name. This method 
generally works very well. However, it will fail if you decide not to rename 
one of a group of files. Each succeeding open command will locate the 
same file 8 As a consequence, RENAME is programmed to terminate if 
you decide not to delete a particular file. 

A PROGRAM TO DELETE DISK FILES 

The program shown in Figure 7.18 can be used to delete disk files. Files 
thatare not write protected can bedeleted with the CPM built-in command 






way. DELETE can be used 
i is requested for deletion. 


and question marks, 


TITLE 'RENAME disk file with ambiguous reference' 


;(Put current date here) 

;Abort program with ESC. 

/Program quits when a system file is found. 
/ 

;Usage: RENAME OLD NEW 
; RENAME OLD. EXT *.BAK 

; RENAME OLD.EXT NEW.* 

/' RENAME OLD. * NEW. * 

; RENAME *.EXT *.BAK 

/ 

FALSE EQU o 

TRUE EQU NOT FALSE 

/ 

BOOT EQU o 

BDOS EQU 5 


5 

100H 

5CH 


;BDOS entry point 
;file control block 


TPA 

FCB 


EQU 

EQU 


FCB 1 EQU 

FCB 2 EQU 

DBUFF EQU 


5CH 

6 CH 

80H 


;first file name 
("second file name 
;default buffer 


;Set flags in main program so only one 
;copy of certain subroutines will be generated. 
,nace set lines before MACLIB call. 


Cl FLAG SET 
CMFLAG SET 
CRFLAG SET 
COFLAG SET 
DEFLAG SET 


FALSE 

FALSE 

FALSE 

FALSE 

FALSE 


;input console char 
;compare 
;carr-ret/l i ne-f eed 
;output console char 
,'delete disk file 


Figure 7.17: Program RENAME to Rename Disk Files 













MVFLAG SET 
OPFLAG SET 
PRFLAG SET 
RNFLAG SET 
UNFLAG SET 
;end of flags 

FALSE 

FALSE 

FALSE 

FALSE 

FALSE 

;block move 
;open disk file 
;print console 
;rename disk file 
;set file attributes 

/ 

MACLIB 

CPMMAC 


ORG 

TPA 



START: 

ENTER 

VERSN 

LDA 

CPI 

JZ 

LDA 

CPI 

JZ 

'(current date).RENAME 
FCB1+1 

BLANK 

NOSOUR 

FCB2 + 1 

BLANK 

NODEST 



COMPAR FCB1 +1, FCB2+1,11 
JZ SAMEN 

COMPAR '???????????'. FCB1 +1 
JZ IMPROP 

COMPAR '???????????', FCB2+1 
JZ IMPROP 

XRA A 

STA FIRSTF 

PRINT 


;zero 

;reset flag 


<LF,'Press ESC to abort',CR,LF> 
•save original parameters 


NEXTN: 


MOVE 

FCB1, FCOPY, 20H 

MOVE 

FCB1, OFCB, 20H 

OPEN 

FCB1, FPASS 

ABORT 

ESC 

MVI 

A,0FFH 


;next name 
;source file 
;quit? 


Figure 7.17 (continued) 
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STA 

LDA 

ANI 

JNZ 

UNPROT 

MOVE 

LDA 

STA 


FIRSTF 
FCB1 +10 
80H 
SYSFIL 
FCB1 

FCB1, OFCB, 12 

FCB1 

DFCB 


/multiple pass 
/system file 
/bit 7 
/skip 

/original 
/drive code 


/ 

;check for ambiguous original file name 


COMPAR 

FCBl+1, FCOPY+1, 8 


JZ 

NOQ1 

/no 

MOVE 

FCBl+1, OFCB + 1, 11 

/actual name 

MOVE 

MOVE 

FCBl+1, DFCB +1, 8 
F2COPY+9, DFCB+9, 3 

/new primary 
/ext 

JMP 

CHEK2 



NOQ1: 

/check for ambiguous original extension 
/ 

COMPAR FCB1 +9, FCOPY + 9, 3 
JZ NOQ3 

MOVE FCB1+1, OFCB+1, 11 
MOVE FCB1 + 9, DFCB+9, 3 

MOVE F2COPY +1, DFCB + 1,8 

JMP CHEK2 

/ 

,check for ambiguous new name 
NOQ3: 


;no 

/actual name 
/new ext 
/primary 


CHEK2: 


AMBIG 


FCB1, DFCB 
DFCB, RENAM 


OPEN 
CRLF 
PFNAME DFCB 
PRINT ' exists. Delete? ' 

READCH 


Figure 7.17 (continued) 
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RENAM: 


FPASS: 


NOSOUR: 

NODEST: 

SAMEN: 

IMPROP: 

FIRSTF: 

SYSFIL: 

DONE: 


FCOPY: 
F2COPY: 
OFCB: 
DFCB: 


UCASE 

CPI 

V 


JNZ 

DONE 

;drive code 

LDA 

FCB1 

STA 

DFCB 


DELETE 

DFCB 


RENAME 

OFCB 


MOVE 

FCOPY +1, FCB+1, 11 

;reset 

JAAP 

NEXTN 


LDA 

FIRSTF 

;get pass flag 

ORA 

A 

;f irst pass? 

JNZ 

DONE 

;no 

ERRORM 

'File not found', DONE 


ERRORM 

'No source file', DONE 


ERRORM 

'No destination file', DONE 


ERRORM 

'Same name', DONE 


ERRORM 

'Improper name', DONE 


DB 

0 

;first pass 


;found system file 


CRLF 

PFNAME FCB 

PRINT ' is a system file' 


EXIT 

DS 

DS 

DS 

DS 

END 


10H 

10H 

10H 

10H 

START 


;original command 
;with second name 
;original name 
;new name 


Figure 7.17 (continued) 
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TITLE 

UtLtTE disk file with ambiguous reference' 

;(Put current date here) 

;Usage: DELETE NAME 

; DELETE NAME. EXT 

; DELETE NAME.* 

; DELETE *.EXT 


/ 

FALSE 

TRUE 

EQU 

EQU 

0 

NOT FALSE 


/ 

BOOT 

BDOS 

TPA 

EQU 

EQU 

EQU 

0 

5 

100H 

;BDOS entry point 

/ 

FCB1 

FCB2 

DBUFF 

EQU 

EQU 

EQU 

5CH 

6 CH 

80H 

;first file name 
;second file name 
/default buffer 


;Set flags in main program so only one 
;copy of certain subroutines will be generated. 
;Place set lines before AAACLIB call. 


CIFLAG 

SET 

FALSE 

CMFLAG 

SET 

FALSE 

CRFLAG 

SET 

FALSE 

COFLAG 

SET 

FALSE 

DEFLAG 

SET 

FALSE 

MVFLAG 

SET 

FALSE 

OPFLAG 

SET 

FALSE 

PRFLAG 

SET 

FALSE 

UNFLAG 

SET 

FALSE 

;end of flags 



AAACLIB 

CPMAAAC 

f 

ORG 

TPA 



;input console char 

/•compare 

;carr-ret/line-feed 

,'output console char 
,'delete disk file 
;block move 
;open disk file 
;print console 
;unprotect file 


Figure 7.18: Program DELETE to Delete Disk Files 













START: 


ENTER 

VERSN 

LDA 

CPI 

JZ 

PRINT 

LDA 

STA 

COMPAR 


'(current date).DELETE 

FCB1+1 

BLANK 

NOSOUR 

<LF,' Press ESC to abort',CR,LF> 
FCB2 + 1 

QUERY ;ask about delete 

'???????????'. FCB1 +1 


ALLNAM: 


NNAME: 


JNZ 

ALLNAM 

PRINT 

'Delete all? 

READCH 


UCASE 


CPI 

'Y' 

JNZ 

DONE 

LXI 

D,FCB1 

MVI 

C,17 

CALL 

BDOS 

CPI 

OFFH 

JZ 

NOSOUR 

CALL 

GETNAM 

LXI 

D,FCB1 

MVI 

C,18 

CALL 

BDOS 

CPI 

OFFH 

JZ 

NNAM2 

CALL 

GETNAM 

JMP 

NNAME 


NNAM2: 


NEXTN: 


;get first file name 
;search for file name 
;found? 


;no 


;get next file name 


;more? 

;no 


LXI 

H,FNAMES—12 

SHLD 

FPNTR 

;next name 

LHLD 

FPNTR ;pointer 

LXI 

D,12 

DAD 

D 

SHLD 

FPNTR ;save 

MOV 

A,M 


Figure 7.18 (continued) 
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CPI 

BLANK 


JZ 

DONE 


MOVE 

, FCB1, 12 


OPEN 

FCB1 

;source file 

ABORT 

ESC 

;quit? 

LDA 

QUERY 

;ask 

CPI 

'Q' 


JNZ 

NOASK 


PRINT 

<CR,LF/ Delete '> 

PFNAME 

FCB1 


PCHAR 



PCHAR 

BLANK 


READCH 



UCASE 



CPI 

'Y' 


JNZ 

NEXTN 


NOASK: 



DELETE 

FCB1, NEXTN 


CRLF 



PFNAME 

FCB1 


PRINT 

' deleted' 


JMP 

NEXTN 


GETNAM: 


;copy name to work area 

RRC 


;3 bits right = 5 left 

RRC 


;0 = 0, 1 = 20H 

RRC 


;2 = 40H, 3 = 60H 

ANI 

60H 

;mask 

MOV 

E,A 


MVI 

D,0 


LXI 

H,DBUFF 


DAD 

D 


XCHG 



LHLD 

FPNTR 

destination 

XCHG 


;to DE 

MOVE 

, , 12 


LXI 

H,12 


DAD 

D 


SHLD 

FPNTR 

;next name 

MVI 

M ( BLANK 

;mark end 

RET 


| 


Figure 7.18 (continued) 
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NOSOUR: 

ERRORM 'No source file', DONE 

FPNTR: 

QUERY: 

DW FNAMES 

DS 1 

;name pointer 

;jf Q, ask before delete 

DONE: 

EXIT 


FNAMES: 

DS 1 

;stack of file names 

/ 

END START 



Figure 7.18 (continued) 


If the letter Q (for query) is given as a second parameter .DELETE requests 
permission to delete each file name, whether or not it is write protected. 
This is particularly useful in deleting improper directory entries. 
Sometimes, for example, a file name contains a nonprinting character or 
a lowercase character. In this case, the file cannot be specifically deleted 
with the CP/M command ERA. The troublesome file can be deleted by 
giving the command 

DELETE *.* Q 

This is a command to delete all files on the disk, but only with permission. 
You will then be presented every file on the disk, one at a time, whether 
write protected or not. If you answer each case with any character besides 
a Y the particular file will not be deleted. The next file name will then appear. 
If you answer Y and the file is protected, you will be asked permission to 

unprotect the file. , 

In this program we use BDOS function 17 to find the first file and 

BDOS function 18 to find subsequent files. When using function 18, all of 
the file names must be copied initially into a buffer area. Then the program 
can work with each file name, one at a time. 


SAVING THE MEMORY CACHE ON DISK 

In Chapter 3 we altered the BIOS so that printer output could be saved 
in a memory cache. We then moved the resulting information down to the 
TP A and created a disk file with the built-in SAVE command. We will 
now write a program to make this task easier. The program shown in 
Figure 7.19 can write the information contained in the memory cache 
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directly to a disk file. The main part of the source program is very short It 
uses the macros ENTER, VERSN, and EXIT in the usual way In addi¬ 
tion, macro GFNAME is supplied so that a file name can be entered after 
program execution has begun. arter 

cac^Th^r 1 r SC ! UP t l W ° u P ° inters at the beginning of the memory 
cache. The first points to the beginning of the text and the second refers to 

the end of the text. The first pointer is F000 hex. Macro WRFILE directly 
writes the disk file from the memory buffer. The command 

CACHE (file name) 

mntWH 3 l Sk fUe Wkh thC requested fi,e name using the information 
contained in the memory cache. 


TITLE 

'CACHE to 

save memory on disk' 

;(Put current date here) 


/ 

;Usage: CACHE DISKFILE 

/ 


/ 

FALSE 

TRUE 

EQU 

EQU 

0 

NOT FALSE 


MPOINT 

MAAAX 

MBUFF 

EQU 

EQU 

EQU 

OFOOOH 
MPOINT+2 
MPOINT+ 2 

;main pointer 
;end of text 
/buffer 

BOOT 

BDOS 

FCB1 

DBUFF 

TPA 

EQU 

EQU 

EQU 

EQU 

EQU 

0 

5 

5CH 

80H 

100H 

/system reboot 
/BDOS entry point 
/input FCB 
/default buffer 
/transient program area 


;Set flags in main program so only one 
;copy of certain subroutines will be generated. 
;Place set lines before AAACLIB call. 


Cl FLAG SET 
CLFLAG SET 


FALSE 

FALSE 


;input console char 
;close disk file 


Figure 7J9: Pr ° gam CACHE to Create a Disk File from the Memory Cache 
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COFLAG 

SET 

FALSE 

CRFLAG 

SET 

FALSE 

DEFLAG 

SET 

FALSE 

DMFLAG 

SET 

FALSE 

FLFLAG 

SET 

FALSE 

FNFLAG 

SET 

FALSE 

MKFLAG 

SET 

FALSE 

MVFLAG 

SET 

FALSE 

OPFLAG 

SET 

FALSE 

PRFLAG 

SET 

FALSE 

RCFLAG 

SET 

FALSE 

RNFLAG 

SET 

FALSE 

S2FLAG 

SET 

FALSE 

UNFLAG 

SET 

FALSE 

WRFLAG 

SET 

FALSE 

;end of flags 



output console char 

carr-ret/line-feed 

delete disk file 
set DMA 
: ill characters 
get file name 
create new disk file 
olock move 
open disk file 
print console buffer 
read console buffer 
rename disk file 
SETUP2 macro not used 
:unprotect 
;write disk file 


MACLIB CPMAAAC 


ORG 

/ 

START: 


TPA 


OP3: 


ENTER 

VERSN 

'(current date). 

CACHE' 

LDA 

FCB1 +1 


CPI 

BLANK 

;file name? 

JNZ 

OP3 

;yes 

GFNAME 

FCB1 

;get file name 

DELETE 

FCB1 

;existing name 

MAKE 

FCB1 

;new one 


•make disk file starting at MMAX 


DONE: 


WRFILE 

CLOSE 

EXIT 

END 


FCB1, MMAX 
FCB1 


START 


Figure 7.19 (continued) 
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SUMMARY 


make^unprotect^pfnwme, ! S, m s“w 2 ° rekS : 

CLOSE, WRITES, LDFILE, WRFILE, and PROTEC. We Ihen wrote 
Ssk ffles XeCUt pr ° grams t0 c °py> coc * e > verify, rename, and delete 


Your macro library directory should now look like this: 


;;Macros in this library 
;; ABORT AAACRO CHAR 

;;AMBIG MACRO OLD, NEW 

;;CLOSE MACRO POINTR 


;;COMPAR AAACRO FIRST, SECOND, BYTES 

;;COMPRA MACRO FIRST, SECOND BYTES 

;;CPMVER MACRO 

;;CRLF AAACRO 

;;DELETE AAACRO POINTR, WHERE 


;;ENTER 

;;ERRORM 

;;EXIT 

;;FILL 

;;GFNAME 

AAACRO 

AAACRO 

MACRO 

AAACRO 

AAACRO 

TEXT, WHERE 

SPACE? 

ADDR, BYTES, CHAR 
FCB 

// 

;;HEXHL 

;;LCHAR 

;;LDFILE 

AAACRO 

AAACRO 

AAACRO 

POINTR 

PAR 

FCB, POINTR, CHAR 

;;AAAKE 

MACRO 

POINTR 

// 

;;MOVE 

;;OPEN 

AAACRO 

AAACRO 

FROM, TO, BYTES 
POINTR, WHERE 

;;OUTHEX 

;;PCHAR 

;;PFNAME 

;;PRINT 

;;PROTEC 

;;READB 

AAACRO 

AAACRO 

MACRO 

AAACRO 

AAACRO 

AAACRO 

REG 

PAR 

FCB 

TEXT, BYTES 

POINTR 

BUFFR 


Flags 

Cl FLAG, COFLAG 
(none) 

CLFLAG, COFLAG, CRFLAG 

PRFLAG, OPFLAG, MVFLAG, 

DEFLAG, Cl FLAG, UNFLAg/ 

RNFLAG, S2FLAG 

CMFLAG 

CMFLAG 

(none) 

CRFLAG, COFLAG 
DEFLAG, CIFLAG 
COFLAG, PRFLAG, UNFLAG 
(none) 

COFLAG, CRFLAG, PRFLAG 
(none) 

FLFLAG 

FNFLAG, FLFLAG, RCFLAG 
COFLAG, CRFLAG, PRFLAG 
HXFLAG, RCFLAG 
LOFLAG 

COFALG, DMFLAG 
RDFLAG 

MKFLAG, COFLAG, CRFLAG 

PRFLAG 

MVFLAG 

OPFLAG, COFLAG, PRFLAG 
CRFLAG 

CXFLAG, COFLAG 
COFLAG 

COFLAG, PRFLAG 
PRFLAG, COFLAG 
(none) 

RCFLAG 
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;;READCH 

"READS 

"RENAAAE 

AAACRO 

AAACRO 

AAACRO 

REG 

POINTR, STAR 
POINTR 

;;SBC 

;;SETDAAA 

;;SETUP2 

AAACRO 

AAACRO 

AAACRO 

POINTR 


// 

/ / 


;;SYSF 

AAACRO 

FUNC, AE 

;;UCASE 

AAACRO 

REG 

;;UNPROT 

AAACRO 

POINTR 

;;UPPER 

AAACRO 

REG 

;; VERSN 

AAACRO 

NUAA 

"WRITES 

AAACRO 

POINTR, STAR 

"WRFILE 

AAACRO 

FCB, POINTR 


CIFLAG, COFLAG 
RDFLAG, COFLAG 
RNFLAG, COFLAG 
PRFLAG, CRFLAG 
(none) 

DMFLAG 

S2FLAG, CIFLAG, COFLAG, 
CRFLAG, CAAFLAG, DEFLAG, 
AAKFLAG, AAVFLAG, OPFLAG, 
PRFLAG, UNFLAG 
(none) 

(none) 

UNFLAG 

(none) 

(none) 

WRFLAG, COFLAG 
PRFLAG 

COFLAG, CRFLAG 
DAAFLAG, WRFLAG 

























































































INTRODUCTION 


In Chapter 6 we briefly looked at the organization of the CP/M disk 
directory. We will now study the directory in more detail by developing a 
program that displays several directory functions. These include a display 
of the disk parameters, an extended listing of the directory with its block 
numbers, and the block allocation map. 
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THE DISK PARAMETERS 

CP/M was originally written for use with the standard IBM 8-inch 
floppy disk. This disk’s format is single density, single sided, and soft sec¬ 
tored. There are 77 tracks with 26 sectors per track. Each sector contains 
128 data bytes. The block size, the smallest amount of data that cani be 
allocated on the disk, is 1024 (IK) bytes. These disk parameters are coded 
into the BDOS area of CP/M version 1.4. Consequently, it is difficult to 
alter this version of CP/M to incorporate disks with different parameters. 

CP/M version 2 is organized differently. The disk parameters are written 
into the BIOS rather than the BDOS. Consequently, it is relatively easy to 
alter this version of CP/M to accommodate any type of disk. The charac¬ 
teristics for each different disk drive are located in an area of memory 
known as the disk parameter block (DPB). This region can be located 
with BDOS function 31. Let us investigate this area. 

Go to disk A and reset the disk drives by typing control-C. Execute the 
debugger DDT (or SID) and write the following short program with the A 

command: 

A100 

0100 MVI C,1F 
0102 CALL 5 
0105 RST 7 

The first instruction of this program loads the C register with 31 (IF hex). 
This is the BDOS function that locates the disk parameters. The second 
instruction calls BDOS and the third instruction returns to the debugger. 
Execute this program with the command G100. Now display the registers 
with the debugger X command. The result might look like this: 

_ Z _ E _ a= qa B = D400 D=0000 H = D48A S=0100 P=0105 RST 07 

The first part of this line gives the state of the CPU flags. In this example, 
the zero flag (Z) and the parity flag (E for even parity) are set. The three 
minus signs indicate that the other flags (carry, half-carry, and sign) are 

reset The next six items give the state of the CPU registers, including e 

stack pointer (S) and program counter (P). The final item is the last in- 
struction that was executed prior to returning to the debugger. 

We are interested in the value contained in the HL register, because it 
contains a pointer to the beginning of the disk parameter block. In this ex¬ 
ample, the disk parameters begin at address D48A hex for the currently 
logged-in drive. However, before we look at these parameters, let us consider 
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other disk formats. You may have more than one kind of disk drive For ex¬ 
ampe, one drive might be single sided and another might be double sided 
Another possibility is that a double-density drive might be able to read 
single-density format as well as double-density format. In either of these 
cases, there will be a different set of disk parameters for each disk format. 

Let us assume that drive A reads double-density format and drive B can 
read either double-density or single-density format. Put a single-density 

diskette into drive B. Write the following program at 200 hex with the A 
command: 

A200 

0200 MVI E,1 
0202 MVI C,E 
0204 CALL 5 
0207 RST 7 

Tins program performs BDOS function 14 (0E hex), which changes the 
default drive Register E refers to the new drive. A value of 0 indicates 
ctaveA, 1 refers to drive B, and so on. In this case we load register E with 
the value of 1 because we are going to change the default drive to B 
Register C is given the value of 0E hex. The third instruction calls BDOS 
and the final instruction returns to the debugger. 

Execute this program with the command G200. The head of disk drive 

on Rerl tf ! , ^ 011 the fr ° nt ° f the drive ^Ould turn 

on. Rerun the first program with the command G100. Then display the 

registers with the X command. The result might look like this: 

-Z-E— A=7B B = D43F D=003F H = D47B S=0100 P=0105 RST 07 

■ ™ S ff time ’ th " ^register refers to a different memory location. That 
s ’ * dlfferent set of disk parameters is referenced this time. Notice that the 

TheDPB ^? rSt , DP , B ^ CXaCt,y 15 bytCS largCr tha " the **<>nd DPB 
PC l d anywhere in BIOS - but it is logical to group them 

, 8 h . n ^ USe . each DPB 1S 15 Bytes l° n g, successive addresses for 
adjacent DPBs will usually differ by 15 bytes. 

We will now study the DPB area. We found a DPB at address D47B hex 

DPBs n for o r th l a H d l e f ° 48A hCX - H ° WeVer ’ there mi 8 ht be additional 

general area Th f f ° rmatS :,, These wil1 u ^ally be given in the same 
general area. Therefore, we will start the display a few lines prior to the 

DPB area we found. Give the debugger command 


DD450 
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The resulting output might look like Figure 8.1. There are actually five 
different DPBs given in this figure. The boldface numbers designate t 

first byte of each DPB. We will study them in more detail shortly. Buttirst 

we will consider the information given in the DPB. 



Figure 8.1: Five Different Disk Parameter Blocks 


THE DISK PARAMETER BLOCK 

Nine items describing the format of the disk are specified in the disk 
parameter block. Some of the entries are one byte long; others are two 
bytes long. Table 8.1 summarizes these items. The value given m the offset 
column is the address relative to the beginning of the DPB. That is, the ad¬ 
dress of each item is the value of the offset plus the DPB address contained 
in the HL register after BDOS call 31. 


Table 8.1: Items Specified in the Disk Parameter Block 


Offset 

Symbol 

Bytes 

Explanation 

0 

SPT 

2 

Logical sectors per track 

2 

BSH 

1 

Block shift 

3 

BLM 

1 

Block mask 

4 

EXM 

1 

Extent mask 

5 

DSM 

2 

Maximum number of blocks 

7 

DRM 

2 

Maximum directory entries 

9 

ALO,l 

2 

Directory allocation 

11 

CKS 

2 

Directory sectors to check 

13 

OFF 

2 

Track offset 


Let us consider the disk parameters in more detail. The first entry, SPT, 
gives the number of logical 128-byte sectors per track. It is a two-byte 
value, with the low-order byte stored first. Many disk controllers are 
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programmed for sectors that are larger than 128 bytes. For examole the 
North Star double-density format uses 512-byte sectors. There are 10 of 

thS?MThat 1 kVr*' ^ SP f J ValUC f ° r tWs disk> however, is 40 rather 
h r h’J h ’ nUmber ° flogical - i 28-byte sectors per track is given 

offhe hl \ S D and the third entries ’ the BSH the BLM < are functions 

thafln h k * f C ' Rem , ember ’ this is the minimum amount of information 
hat can be referenced on the disk. The BSH is the logarithm base 2 of 

the number of 128-byte sectors in the block. For example, the standard 
IBM single-density, 8-inch format uses eight sectors per block Conse 

of 128 BSH iS 3 (SinCC 23 = 8 ^- The BLM is one less than°he number 

128-byte sectors per block. The possible values for BSH and BLM are 
summarized in Table 8.2. e 


Table 8.2: Possible Values for BSH and BLM 


Block Number of 
size sectors BSH BLM 


IK 8 

2K 16 

4K 32 

8K 64 

16K 128 


3 7 

4 15 

5 31 

6 63 

7 127 


We have seen that disk files are described by a 32-byte FCB The first 16 

location of each block of sectors on the disk. The single-densitv 8 inch 
£ 1K Each FCB on this disk 

„ h W w d ° uble ' density dlsks > the situation is different. We have seen that 

Cons U -H e d f CnSlty dlSk i Can have 3 block size of2K > 4K, 8K, or 16K bytes 
Consider, for example, a disk with a 2K block size. The 16 pointers^ 

extent eachFCBis 15 ?^ CP/M iS programmed to handle a 16K 

there carfhp fp B £* vldcd ,nto two 16K byte extents. In a similar way, 
there can be four 16K extents in one FCB when the block size is 4K bytes 

extent r Fb?ex° a 8y 1 S ° metimes confusing wh en an FCB is referred to asan 
tent^n For . example - We may read about a format that has four logical ex¬ 
in each FCB Py CXtent ' The Writer means that there can he 64K bytes 

The situation is further complicated if a disk has more than 255 blocks 
In this case the pointers are two bytes in length. Consequently, there can 


















be no more than eight pointers in an FCB. A disk with a2KWock size and 
two-byte pointers can only reference 16K bytes in each FCB 
The many possible formats are decoded with the help of the fourth ite 
in the disk parameter block. This is the extent mask, EXM, a one-byte 
value This entry is a function of both the block size and the total number 
of blocks on the disk. It is one less than the maximum number of extend 
that can fit into each FCB. Table 8.3 shows this relationship. Small disks 
have less than 256 blocks; large disks have more. 


Table 8.3: Possible Values for EXM 



Extent mask 

Block 

Small 

Large 

size 

disk 

disk 

IK 

0 

— 

2K 

1 

0 

4K 

3 

1 

8K 

7 

3 

16K 

15 

7 


The fifth entry gives the largest block number on the disk. It is identi¬ 
fied by the symbol DSM. The two-byte value is stored with the low b^ 
first. Because block numbers begin with zero, the actual number of blocks 

is one larger than the value given as the DSM. 

The sixth entry, DRM, has a value that is one smaller than the maximum 
number of directory entries. It is a two-byte value that is stored with the 
low byte first. Directory entries are 32 bytes long. Consequently, there are 
four directory entries for each logical 128-byte sector. 

The CP/M directory occupies the first one or more data blocks on the 
disk Consequently, these blocks must always be allocated so that data are 
not accidentally written onto them, destroying the directory. The seventh 
entry is used for this purpose. The two bytes are considered together as a 
St map. Starting at the left side, each bit that is set to 1 reserves one 
block for the directory. The binary representation in Table 8.4 shows the 

^Wheif a dtskette'is removed from the drive and replaced by another, 
it is necessary to perform a warm start before data can be written on e 
new diskette. Whenever a write operation is requested, CP/M checks 
the directory to see if the diskette has been changed. The eighth entry 
in the DPB specifies the number of directory sectors that should be 
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Table 8.4:16-Bit Map Determining Directory Allocation 


Number of 


directory 

Binary value 

Hex value 

blocks 

AL0 

AL1 

AL0 

AL1 

1 

10000000 

00000000 

80 

0 

2 

11000000 

00000000 

CO 

0 

3 

11100000 

00000000 

E0 

0 

4 

11110000 

00000000 

F0 

0 


checked prior to each write operation. 

For floppy disks or other removable media, the CKS will be the number 
of directory entries, DRM plus one, divided by four (the number of entries 
per sector). If the disk medium cannot be changed, as a hard disk cannot, 
then there is no need to make such a check. In that case, the value is set to 
0 , greatly speeding up the warm-start operation. 

The ninth and last entry in the DPB is the track offset. This two-byte 
value is added to the track number requested by BDOS (the logical track 
number) to obtain the actual (physical) track number. This parameter can 
be used to partition one large disk into several logical disks. Each logical 
disk will have a different track offset. For example, suppose one large 
disk is partitioned into logical disks A, B, and C. The offsets could be 0, 
100, and 200 for drives A, B, and C. 

The DPB for a standard 8-inch, single-density floppy disk is given in 
Table 8.5. 


Table 8.5: The DBF for a Standard 8-Inch Floppy Disk 


Address Symbol Hex Decimal Meaning 


D499 

SPT 

1A 

26 

D49B 

BSH 

3 

3 

D49C 

BLM 

7 

7 

D49D 

EXM 

0 

0 

D49E 

DSM 

F2 

242 

D4AO 

DRM 

3F 

63 

D4A2 

AL0 

CO 


D4A4 

CKS 

10 

16 

D4A6 

OFF 

2 

2 


Logical sectors per track 
Block shift 
Block mask 
Extent mask 

Number of Blocks — 1 (243 actual) 
Directory entries — 1 (64 actual) 
Directory allocation (11000000) 
Directory sectors to check 
Track offset 
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Consider the DPB for drive A starting at address D48A (line 4 of Figure 
8 .1). This DPB describes a double-density, 5-inch drive that has 40 sectors 
per track (28 hex). There are 82 blocks (51 hex -I-1), each with a size of 2K 
bytes (BLM is 15). There are 64 directory entries (3F hex + 1), so one 
block is reserved for the directory (AL1 is 80 hex or 10000000 binary). The 
track offset is 2. 


VIEWING THE DISK PARAMETERS 

Before we can write an executable program for displaying the disk 
parameters, we must add five new macros that will make it easier to program 
displays of binary numbers, 16-bit base conversions, and multiplication 
and division. 

A Macro to Display a Binary Number in Binary 

All information, whether alphanumeric characters, decimal numbers, 
or hexadecimal numbers, is stored in a computer as a sequence of bits— 
binary zero or binary one. We have already written routines to convert 
binary numbers to ASCII and hexadecimal. Sometimes, however, we 
want to consider the bits themselves. To represent this pattern for a byte, 
we must display a sequence of eight ASCII zeros and ones. The routine 
that performs this task is called a binary to ASCII binary program. 

In Chapter 3 we used this routine to determine whether our printer in¬ 
corporates a DTR bit. Let us now use that routine in the form of a macro. 
Copy macro BINBIN, shown in Figure 8.2, into your macro library. 
Notice that it uses the flag BNFLAG. 

A Macro to Display a 16-Bit Binary Number in Decimal 

Sometimes we need to determine the decimal equivalent of a binary 
number. The largest 8-bit number is 255. Therefore, in converting an 8-bit 
binary number to decimal, we must consider three powers of ten—10°, 
10 1 , and 10 2 . But we are going to convert a 16-bit number to decimal, and 
in this case the largest number is 65,535. We must therefore consider five 
powers of ten—10°, 10', 10 2 ,10 3 , and 10 4 . 

The algorithm we use subtracts powers of ten from the original number 
until the result becomes negative. Then we add back the most recent term. 
The net number of subtractions is the decimal power. We continue in this 
way with 1000, 100, and 10. 
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BINBIN 

AAACRO 



;;(Put current date here) 



;;ln 1 ine macro to convert binary number in A 
;;to a string of ASCII-coded binary characters. 

// 

LOCAL 

BIT2, AROUND 



CALL 

BINB2? 



IF 

NOT BNFLAG 



JAAP 

AROUND 


BINB2?: 

PUSH 

B 



MOV 

C,A 



MVI 

B,8 


BIT2: 

MOV 

A,C 



ADD 

A 

;;set carry 


MOV 

C,A 



MVI 

A/0V2 



ADC 

A 



PCHAR 

DCR 

B 



JNZ 

BIT2 



POP 

H 



RET 



BN FLAG 

SET 

ENDIF 

TRUE 


AROUND: 

ENDM 


;; BINBIN 


Figure 8.2: Macro BINBIN to Display a Binary Number as a Sequence of 
ASCII Zeros and Ones 


We have seen that the 8080 CPU cannot directly perform a 16-bit sub¬ 
traction. We therefore wrote macro SBC for this purpose. We also noticed 
that we could subtract one number from another by adding the two’s 
complement. Our algorithm uses this technique. We begin by repeatedly 
adding —10,000, the two’s complement of 10,000. When the result 
becomes negative, we add back that last subtraction by subtracting the 
two’s complement. We use macro SBC for this purpose. 
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A second complication is the matter of leading zeros. If a number is less 
than 10,000, the left digit will be 0. If the number is less than 1000, there 
will be another 0 in the next position. However, it is customary to omit 
leading zeros in decimal numbers, so we will delete the leading zeros from 
our resulting decimal number. 

Macro HLDEC, shown in Figure 8.3, converts a 16-bit binary number 
in HL to a string of ASCII-coded decimal digits and displays the result on 
the console. Add this macro to your library. 

A Macro to Display a 16-Bit Binary Number in Hexadecimal 

In Chapter 5 we wrote macro OUTHEX to convert an 8-bit binary 
number to two hexadecimal characters and display them on the console. 
For the programs in this chapter we will need to convert a 16-bit binary 
number in HL to hexadecimal characters. We will use macro OUTHEX 
for this purpose. If the value in HL is larger than 255, we will reference 


HLDEC 

MACRO 



;;(Put current date here) 
;;lnline macro to print HL 

as decimal. 


;;Macros needed: SBC, PCHAR 


// 

LOCAL 

AROUND,SUBTR,SUBT2,NZERO 


CALL 

HLDC2? 



IF 

NOT DEFLAG 



JAAP 

AROUND 


HLDC2?: 

PUSH 

H 



PUSH 

D 



PUSH 

B 



AAVI 

B/0 

;;leading-zero flag 


LXI 

0,-10000 

;two's complement 


CALL 

SUBTR 

;ten thousands 


LXI 

D, —1000 



CALL 

SUBTR 

thousands 


LXI 

D, —100 



CALL 

SUBTR 

;;hundreds 


Figure 8.3: Macro HLDEC to Display a 16-Bit Binary Number in Decimal 
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LXI 

D, —10 


CALL 

SUBTR 

;;tens 

MOV 

A,L 


ADI 

'O' 

;;ASCII bias 

PCHAR 



POP 

B 


POP 

D 


POP 

H 


RET 



// 

;;subtract power of ten and count 


SUBTR: MVI 

C/O'-l 

;;ASCII count 

SUBT2: INR 

c 


DAD 

D 

;;add neg number 

JC 

SUBT2 

;;keep going 

;;one too many, add one back 


;;by subtracting complement 


SBC 

HL,DE 


MOV 

A,C 

;;get count 

;;check for zero 



CPI 

'V 

;;< i? 

JNC 

NZERO 

;;no 

MOV 

A,B 

;;check zero flag 

ORA 

A 

;;set? 

MOV 

A,C 

;;restore 

RZ 


;;skip leading 0 

PCHAR 



RET 



;;set flag for nonzero character 


NZERO: 



MVI 

B,0FFH 


PCHAR 



RET 



DEFLAG SET 

TRUE 


ENDIF 



AROUND: 


;;HLDEC 

ENDM 




Figure 8.3 (continued) 
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macro OUTHEX twice. This will produce four ASCII characters. If the 
value in HL is less than 256, the value in H is 0. In this case, we will 
reference macro OUTHEX only once. Macro OUTHL is shown in Figure 
8.4. Add it to your macro library. 

A Macro to Multiply a 16-Bit Number by a Power of 2 

The 8080 and Z80 CPUs have instructions for addition and subtraction, 
but they do not have instructions for multiplication and division. We will 
now write a macro to multiply a 16-bit number in HL by a power of 2, using 
addition and rotation. Restricting the multiplier to a power of 2 greatly 
simplifies the algorithm without limiting our applications, because our 
applications always need a multiplier of this type. 

We consider two special cases at the beginning of the macro. If the 
multiplier is 0, the result in HL is set to 0. If the multiplier is 1, the original 
value in HL is returned. We place other multipliers into register B and 
then add HL to itself. This doubles the original multiplicand. We then 
rotate the multiplier in B and check the carry flag. If the carry flag is set, 
the multiplier is 2 and the task is finished. However, if the carry flag is 
reset, the original multiplier was larger than 2. We continue adding HL to 
itself and rotating B to the right into the carry flag. 

Add macro MULT, shown in Figure 8.5, to your macro library. This 
macro has one optional parameter—the multiplier. If the parameter is 
omitted in the reference, it is assumed that the multiplier is already loaded 
in the accumulator. 


A Macro to Divide a 16-Bit Number by a Power of 2 

The complement of the previous macro is a routine to divide a 16-bit 
number in HL by a power of 2. When we double the value in HL by adding 
it to itself, the result is the same as shifting the double register to the left. 
Division is accomplished by shifting to the right. However, there is no 
16-bit shift or rotation instruction, so we must perform two 8-bit rota¬ 
tions instead. 

Macro DIVIDE is shown in Figure 8.6; add it to your library. There is 
one optional parameter, the divisor. If it is omitted from the macro 
reference, a value of 2 is assumed. Division by zero is undefined, but this 
macro will leave the dividend unchanged in this case. The result is also un¬ 
changed if the divisor is 1. 

Now that we have added the necessary macros, we can write a program 
that will display the disk parameters. 
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OUTHL 

MACRO 


;;(Put current date here) 

“Inline macro to display HL in hex. 

“Macro needed: OUTHEX 

// 

LOCAL 

OVER 


MOV 

A,H 


ORA 

A 


JZ 

OVER 


OUTHEX 

H 

OVER: 

OUTHEX 

L 



“OUTHL 


ENDM 



Figure 8.4: Macro OUTHL to Display a 16-Bit Binary Number in Hexadecimal 


MULT AAACRO TIMES 

;;(Put current date here) 

;;lnline macro to multiply value in HL by TIMES. 
^Parameter should be a power of 2. 

;;0and 1 are valid operands. 

“Parameter is omitted when A has multiplier. 


LOCAL 

LOOP, AROUND, NOTZ 

PUSH 

B 

IF 

NUL TIMES 

MOV 

ELSE 

B,A 

MVI 

ENDIF 

B,TIMES 

CALL 

MULT2? 

POP 

B 

IF 

NOT MLFLAG 

JMP 

AROUND 


MULT2?: 


Figure 8.5: Macro MULT to Multiply a 16-Bit Number in HL by a Power of 2 
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MOV 

A,B 



ORA 

A 

;zero 


JNZ 

NOTZ 

;no 


MOV 

L,A 



MOV 

H,A 

;HL = 0 


RET 



NOTZ: 

RAR 




RC 


;times 1 


MOV 

B,A 


LOOP: 

DAD 

H 

;times 2 


MOV 

A,B 



RAR 




MOV 

B,A 



JNC 

LOOP 



RET 



MLFLAG 

SET 

ENDIF 

TRUE 

;;one copy 

AROUND: 

ENDM 


;;MULT 


Figure 8.5 (continued) 


DIVIDE MACRO DENOM 

;;(Put current date here) 

"Inline macro to divide HL register by DENOM. 
"Denom should be power of 2 (2, 4, 8, 16). 
;;HL unaltered if DENOM is 0 or 1. 


LOCAL 

AROUND, SHFTR?, DIV3? 

PUSH 

B 

IF 

NUL DENOM 

MVI 

B,2 ;default 

ELSE 


MVI 

B, DENOM 

ENDIF 



Figure 8.6: Macro DIVIDE to Divide a 16-Bit Number in HL by a Power of 2 
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CALL 

DIV2? 



POP 

B 



IF 

NOT DVFLAG 



JAAP 

AROUND 


DIV2?: 

MOV 

A,B 



ORA 

A 

;clear carry 


RZ 


;divide by zero? 


RAR 



RC 


;divide by 1? 


MOV 

B,A 

DIV3?: 

CALL 

SHFTR? 

;shift HL right 


MOV 

A,B 

;get divisor 


RAR 




MOV 

B,A 



JNC 

DIV3? 



RET 



SHFTR?: 

XRA 

A 

; 16-bit shift right 


MOV 

A,H 



RAR 




MOV 

H,A 



MOV 

A,L 



RAR 




MOV 

L/A 



RET 



DVFLAG 

SET 

ENDIF 

TRUE 

;;one copy 

AROUND: 

ENDM 


;; DIVIDE 


Figure 8.6 (continued) 


A Program to Display the Disk Parameters 

The program shown in Figure 8.7 can be used to determine the disk 
parameters for any CP/M disk. The CP/M version must be 2.0 or greater 
for this program to run. The program begins in the usual way with macros 
ENTER and VERSN. Then macro CPMVER is used to determine the 
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CP/M version. If the version is less than 2, the program is terminated with 
the appropriate error message. 

The memory FCB at 5C hex is checked next to see whether a disk drive 
was specified on the command line. If a specific drive was indicated, 
subroutine SETDSK is called. This subroutine selects the desired disk 
with BDOS function 14. If no disk drive was specified, the default drive is 
used. Subroutine SETDSK concludes in an interesting way—with a jump 
to BDOS rather than the usual call. The more obvious construction 

CALL BDOS 

RET 

performs the same task. However, it requires more code and more stack 
space than the instruction 

JMP BDOS 

The next step is to determine the address of the disk parameter block using 
BDOS function 31. The disk parameters are then moved to the end of the 
program so they can be altered slightly. For example, the greatest block 
number (DSM) is incremented so that it becomes the total number of 
blocks. The number of directory entries (DRM) is incremented and then 
divided by four to find the corresponding number of directory sectors. 
This is saved as DIRMAX. 

The allocation bytes (ALO and AL1) are interchanged so that the low 
byte will be in the H register after an LHLD operation. Repeated DAD 
H instructions will then shift the HL register left into the carry flag. This 
flag will be set each time there is a corresponding bit set in ALO and 
AL1. Remember, each bit corresponds to one reserved directory block. 
The number of reserved directory blocks is determined in this way. The 
result is subtracted from the total number of blocks to find the number of 
data blocks. This is stored as NETBL. The number of directory blocks is 
converted from binary to ASCII and saved as ALLOCA. This value 
will be used later. 

Type in the program shown in Figure 8.7 and assemble it. The macro 
library we have developed is needed in the program. First try this program 
on the default drive with the command 

DIREC 

Then try it on another drive by giving a parameter: 

DIREC B: 

The second example will display the disk parameters for drive B. 
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TITLE 

'DIREC, directory utility' 


/ 

;(Put current date here) 

/ 


FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


BOOT 

EQU 

0 


BDOS 

EQU 

5 

;BDOS entry point 

TPA 

EQU 

100H 


FCB 

EQU 

5CH 

;file control block 

FCBl 

EQU 

5CH 

;first file name 

FCB2 

EQU 

6CH 

;second file name 

DBUFF 

EQU 

80H 

/default buffer 

ABUFF 

EQU 

DBUFF 

/actual buffer 

UNUSED 

EQU 

0E5H 

/dir entry 

LAAAX 

EQU 

24 

/max lines/screen 

/ 

;Set flags in main program so only one 


;copy of certain subroutines will be generated. 

;Place set lines before MACLIB call. 


/ 

BNFLAG 

SET 

FALSE 

/binary to ASCII bin 

COFLAG 

SET 

FALSE 

/output console char 

CRFLAG 

SET 

FALSE 

;carr-ret/l i ne-feed 

CXFLAG 

SET 

FALSE 

/binary to hex 

DEFLAG 

SET 

FALSE 

/binary to decimal 

DVFLAG 

SET 

FALSE 

/16-bit divide 

MLFLAG 

SET 

FALSE 

/16-bit multiply in HL 

MVFLAG 

SET 

FALSE 

/block move 

PRFLAG 

SET 

FALSE 

/print console 

;end of flags 



/ 

AAACLIB 

CPMAAAC 


/ 

ORG 

/ 

TPA 




Figure 8.7: Program to Display the Disk Parameters 
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START: 


• 

ENTER 



VERSN 

'(current date).DIREC. 1' 

CPMVER 


;check version 

CPI 

20H 


JC 

ERRVER 

;wrong version 

LDA 

FCB1 


ORA 

A 

;drive specified? 

CNZ 

SETDSK 

;yes 

CALL 

GETDPH 

;disk parameters 

CALL 

XAAAINE 


JAAP 

DONE 


/ 

;block move disk parameters to end of 

program 

/ 

GETDPH: 



AAVI 

C,31 

;disk param address 

CALL 

BDOS 


MOVE 

,DPARAA,15 

;copy to end 

LHLD 

BLKAAAX 

;maximum # blocks 

INX 

H 


SHLD 

BLKAAAX 

;starts at zero 

LHLD 

DIRENT 

;# of directory entries 

INX 

H 

;starts at zero 

DIVIDE 

4 

;convert to # sectors 

;Save number of directory sectors as 16 

i bits 

SHLD 

DIRAAAX 

;and save 

SHLD 

DIRAAX2 

;count. 

;Directory block allocation is stored as 


;1000 0000 for 1 block, 1100 0000 for 2, 

etc. 

;But we want left byte in H. 


LHLD 

ALLOC 

;reverse bytes 

AAOV 

A,L 


AAOV 

l,H 


AAOV 

H,A 


SHLD 

ALLOC 


;get number of directory blocks as ASCII 


Figure 8 .7 (continued) 
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XRA 

A 

;zero A 

XAM3: 





DAD 

H 

;shift left 


JNC 

XAM4 



INR 

A 



JAAP 

XAM3 


XAM4: 





MOV 

E,A 

;# dir blocks 


MVI 

D/0 



LHLD 

BLKAAAX 

;blocks 


SBC 

HL,DE 

;deduct for directory 


SHLD 

NETBL 

;net data blocks 


MOV 

A,E 



ORI 

'0' 

;ASCII bias 


STA 

ALLOCA 

;save 


RET 



/ 

;display disk parameters 


/ 

XAMINE: 





PRINT 

<CR,LF,'Sectors/track: '> 


LHLD 

NUMSEC 



HLDEC 


;decimal 


PCHAR 

BLANK 



PCHAR 

T 



OUTHL 




PRINT 

<' hex)',CR,LF/Sectors/block: '> 


LDA 

BLM 



INR 

A 



MOV 

L,A 



MVI 

H,0 



HLDEC 




PCHAR 

BLANK 



PCHAR 

T 



OUTHEX 

L 



PRINT 

' hex)' 



PRINT 

<CR,LF/Block 

size: '> 


DIVIDE 

8 



MOV 

B,L 

;save block size 


Figure 8.7 (continued) 
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HLDEC 


PRINT 

'K bytes' 

LHLD 

NETBL ;# data blocks 

MOV 

A,B ;blocksize 

MULT 


PRINT 

<CR,LF/Disk size: '> 

HLDEC 


PRINT 

'K bytes' 

PRINT 

<CR,LF,'Extents/entry: '> 

LDA 

EMASK 

INR 

A 

MOV 

L,A 

AAV 1 

H,0 

HLDEC 


PRINT 

<CR,LF,'Number of blocks: '> 

LHLD 

BLKMAX 

HLDEC 


PCHAR 

BLANK 

PCHAR 

T 

OUTHL 


PRINT 

<' hex^CR^F/AAax directory entries: '> 

LHLD 

DIRENT 

INX 

H 

HLDEC 


PCHAR 

BLANK 

PCHAR 

T 

OUTHL 


PRINT 

<' hexJ^CR.LF/Directory blocks: '> 

LDA 

ALLOCA 

PCHAR 


PCHAR 

BLANK 

PCHAR 

T 

LDA 

ALLOC+ 1 

BINBIN 

;alloc in binary 

LDA 

ALLOC 

ORA 

A 

JZ 

XAAA2 

BINBIN 

;2nd if needed 

XAAA2: 



Figure 8.7 (continued) 
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PRINT 

<%CR,LF/Track offset: '> 


LHLD 

TRKOFF 



HLDEC 

MOV 

A,H 



ORA 

A 



JZ 

XAM5 

;skip hex 


PCHAR 

BLANK 



PCHAR 

OUTHL 

'(' 



PRINT 

7 hex) 7 


XAM5: 

CRLF 




RET 



SETDSK: 

DCR 

A 

;set disk drive 
;0=A, 1 =B 


MOV 

E,A 



MVI 

C,14 

;select new drive 


JMP 

BDOS 


ERRVER: 





ERRORM 

7 ?CP/M version must be 2 or greater 7 

DONE: 

EXIT 



DPARM: 



;copy of disk parameters 

NUMSEC: 

DS 

2 

;sectors per track 

BSHIFT: 

DS 

1 

;block shift 

BLM: 

DS 

1 

;block mask 

EMASK: 

DS 

1 

;extent mask 

BLKMAX: 

DS 

2 

;max # blocks on disk 

DIRENT: 

DS 

2 

;max # dir entries 

ALLOC: 

DS 

2 

;AL1, ALO reversed 

CKS: 

DS 

2 

;check size 

TRKOFF: 

DS 

2 

;track offset 

/ 

DIRMAX: 

DS 

2 

;max # directory sectors 

NETBL: 

DS 

2 

;number of data blocks 

ALLOCA: 

DS 

1 

directory blocks (ASCII) 

DIRMX2: 

DS 

2 

remaining dir sectors 

/ 

END 

START 



Figure 8.7 (continued) 
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The results for an 8-inch, single-density floppy will look like Figure 8.8. 
The display shows that there are 26 sectors per track and 8 sectors per 
block of IK bytes. There are 64 directory entries that are stored in 2 
blocks. The disk can hold a maximum of 241K bytes of data, exclusive of 
the directory. The track offset is 2; that is, the first two tracks are reserved. 

On the other hand, a 5-inch, double-density, double-sided, hard- 
sectored floppy might give the results shown in Figure 8.9. In this example, 
there are 40 logical sectors per track and 16 sectors per 2K block. The disk 
can store a maximum of 338K bytes, exclusive of the one block reserved 
for the directory. 


Sectors/track: 26 (1A hex) 
Sectors/block: 8 (8 hex) 

Block size: 1K bytes 
Disk size: 241K bytes 
Extents/entry: 1 

Number of blocks: 243 (F3 hex) 
Max directory entries: 64 (40 hex) 
Directory blocks: 2 (11000000) 
Track offset: 2 


Figure 8.8: The Disk Parameters for an 8-Inch Floppy 


Sectors/track: 40 (28 hex) 
Sectors/block: 16 (10 hex) 

Block size: 2K bytes 
Disk size: 338K bytes 
Extents/entry: 2 

Number of blocks: 170 (AA hex) 
Max directory entries: 64 (40 hex) 
Directory blocks: 1 (10000000) 
Track offset: 2 


Figure 8.9: The Disk Parameters for a 5-Inch Floppy 
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THE DISK DIRECTORY BLOCKS 

The first one or more data blocks on each CP/M disk contain a direc¬ 
tory of the files that are present on the remainder of the disk. As we saw in 
Chapter 6, each directory entry is 32 bytes long. Consequently, a logical 
128-byte sector can reference a maximum of four disk files. 

We saw that the first byte of each directory entry refers to the user who 
created the file. This is a binary number from 0 to 15. A value of E5 hex in 
this position indicates that the file has been deleted. The file name and extent 
are coded in ASCII in the next 11 bytes. Then there are four bytes that 
contain the extent number and the number of records. 

The actual location of the file is indicated by the remaining 16 bytes. 
For smaller disks, each block is identified as a one-byte binary number. 
Larger disks use two-byte block numbers with the low-order byte given first. 

Let us now see how a group of files is stored on three different types of 
disks. The three disk types are as follows: 

• lK-byte block size, 1-byte block addresses 

• 2K-byte block size, 1-byte block addresses 


• 2K-byte block size, 2-byte block addresses 

Our last program in the book will investigate the FCB. For a IK block 
size we might obtain a listing as follows: 


00 

CPMIO 

ASM 

00000055 

02030405060708090A0B0C00 

00 

DUMP 

COM 

00000007 

0D00 

00 

GO 

COM 

00000002 

0E00 

00 

LOAD 

COM 

0000000E 

0F1000 

00 

CPMIO 

HEX 

00000007 

1100 

00 

WSOVLY1 

OVR 

00000080 

12131415161718191A1B1 Cl D1 El F2021 

00 

WSOVLY1 

OVR 

01000080 

22232425262728292A2B2C2D2E2F3031 

00 

WSOVLY1 

OVR 

0200000A 

323300 

01 

TIME 

COM 

0000000A 

343500 

02 

SORT 

BAS 

00000009 

363700 

02 

SORT 

BAK 

0000000F 

383900 

E 5 

SORTA 

BAS 

00000008 

3A00 

E5 

PRIN 

STR 

oooooooc 

3B3C00 


The first FCB, CPMIO.ASM, belongs to user 0. It contains 55 (85 
decimal) records stored in blocks 02 to 0C. The block numbers refer to 
the actual regions on the disk where the file is stored. The next file, 
DUMP.COM, has seven records; they all fit into block OD. Lines 6,7, and 
8 of the directory listing refer to the same file, WSOVLY1 .OVR. This file 
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is so large that it requires three FCBs (called physical extents). The first 
and second FCBs (designated 0 and 1) contain 80 records. The third FCB 
is designated as extent 2; it has 0A records. The block numbers run from 
12 to 33 hex. For this disk format, each FCB can reference a maximum of 
one extent of 80 records (16K bytes). 

The block size for the previous example is IK bytes. However, CP/M 
disks may have block sizes of 2K, 4K, 8K, or 16K bytes. The next disk for¬ 
mat we will consider has 2K bytes per block. With this format each FCB 
can contain a maximum of two 16K logical extents. Let us see how the 
previous files are stored with this format: 


00 

CPMIO 

ASM 

00000055 

01020304050600 

00 

DUMP 

COM 

00000007 

0700 

00 

GO 

COM 

00000002 

0800 

00 

LOAD 

COM 

0000000E 

0900 

00 

CPMIO 

HEX 

00000007 

0A00 

00 

WSOVLY1 

OVR 

01000080 

0B0C0D0E0F101112131415161718191A 

00 

WSOVLY1 

OVR 

0200000A 

1 BOO 

01 

TIME 

COM 

0000000A 

1C00 

02 

SORT 

BAS 

00000009 

1D00 

02 

SORT 

BAK 

0000000F 

1E00 


The files in this example are the same size as in the previous example. 
However, fewer blocks are needed for the longer files because the block 
size is twice as large. Notice that WSOVLY1 .OVR needs only two FCBs 
rather than three. However, the first of these two FCBs shows an extent of 
1, meaning that extents 0 and 1 are both contained in one FCB. Each of 
the two extents has 80 records. The third extent, extent 2, is contained in 
the second FCB. It has 0A records. The block numbers run from OB to 1B. 

As a third example, consider a high-density disk that also has a 2K-byte 
block size but uses two-byte block addresses. The same files are shown 
again. However, the block addresses now appear as 0200,0300,0400, and 
so on: 


00 CPAAIO 
00 DUMP 
00 GO 
00 LOAD 
00 CPMIO 
00 WSOVLY1 
00 WSOVLY1 
00 WSOVLY1 


ASM 00000055 020003000400050006000700 

COM 00000007 0800 

COM 00000002 0900 

COM 0000000E 0A00 

HEX 00000007 0B00 

OVR 00000080 0C000D000E000F001000110012001300 
OVR 01000080 1400150016001700180019001A001 BOO 
OVR 0200000A 1C00 
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THE BLOCK ALLOCATION MAP 

When a warm start is performed by typing control-C, all disk drives are 
reset and the directory on drive A is read. If a drive other than A is cur¬ 
rently the default drive, the disk directory for that drive is also read at this 
time. A block allocation map is constructed during this initialization step. 
This map uses a single bit to represent each block. Blocks that are cur¬ 
rently in use are given a value of 1. Unused blocks have a value of 0. CP/M 
searches the map for unused blocks when a new file is to be created. 

The third part of our last program constructs a block map not from the 
CP/M version, but by actually locating each block address in the disk 
directory. Our technique will show when there are multiple references to a 
particular block. 

The map for a newly formatted disk might look like that in Figure 8.10. 
In this example, the first block, block 0, is located in the upper-left corner. 
The value of 1 means that the block is in use. The remaining positions 
have a value of 0, indicating that they are not in use. The first block of this 
disk is reserved for the directory. The directory itself will always occupy 
the first one or more blocks at the beginning of the data area. Thus there 
will always be values of 1 at the beginning of this map. The number of 
blocks given in the summary at the bottom of the display does not include 
those reserved for the directory. 

Each time a file is saved on a disk, the corresponding blocks will be set 
to 1. As more and more files are saved, the block map gradually becomes 
filled in. If some files are erased, holes will open up in the table. After a 
while, the map might look like that in Figure 8.11. 

The allocation map also can indicate whether there are multiple links to a 
file. For example, consider the allocation map in Figure 8.12. In this example, 
several blocks (41,42,47, and others) are marked with a value of 2. This 



01234567 

89ABCDEF 

01234567 

89ABCDEF 

00 

10000000 

00000000 

00000000 

00000000 

20 

00000000 

00000000 

00000000 

00000000 

40 

00000000 

00000000 

00000000 

00000000 

60 

00000000 

00000000 

00000000 

00000000 

80 

A0 

00000000 

00000000 

00000000 

00 

00000000 

00000000 


169 total blocks, 0 in use, 169 remaining 


Figure 8.10: Block Allocation Map for a Newly Formatted Disk 
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01234567 

89ABCDEF 

01234567 

89ABCDEF 

00 

11111111 

11111111 

11111111 

11111111 

20 

11111111 

11111000 

01111111 

11111111 

40 

11111111 

11111111 

10000001 

11111111 

60 

11111111 

00000000 

00000000 

00000000 

80 

00000000 

00000000 

00000000 

11111111 

A0 

11111000 

00 



169 total blocks, 

63 in use, 

106 remaining 


Figure 8.11: Block Allocation Map for a Disk with Files 



01234567 

89ABCDEF 

01234567 

89ABCDEF 

00 

11111111 

11111111 

11111111 

11111111 

20 

11111111 

11111111 

11111111 

11111111 

40 

12211112 

21111111 

11111111 

11111111 

60 

22111111 

11111110 

11111111 

11111121 

80 

11101222 

21111111 

11111111 

11111111 

A0 

11111101 

11 



169 total blocks, 

166 in use, 3 remaining 


Figure 8.12: Block Allocation Map Indicating Multiple Links 
to a File 


indicates that there are two different files that refer to these blocks. This 
can occur with a disk utility program such as BADLIM or RECLAIM. 
These programs read the entire disk looking for bad sectors. If bad sec¬ 
tors are found, they are collected into a special file so that they will not be 
used. Of course, if the original program is still present, it will also refer to 
these sections. 


VIEWING THE DISK DIRECTORY BLOCKS 
AND THE BLOCK ALLOCATION MAP 

In this section we will extend our directory program so it will display the 
actual directory entries. The user number and block addresses will be 
shown. A separate feature will construct a block allocation map for the 
disk. Before we develop this program, however, we need to add one more 
macro to our library. 
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A Macro to Fill Large Blocks 

In Chapter 4 we wrote a macro to fill an area of memory with a partic¬ 
ular byte. The area was limited to 256 bytes, because a single register was 
used to count the number of locations to fill. For the next program we will 
need to fill an area larger than 256 bytes. Consequently, we will alter 
our FILL macro so that a double register is used to count the number of 
locations. 

Make a copy of macro FILL and give it the name FILLD (for double 
precision). Alter the new macro so it looks like Figure 8.13. Notice that the 
same flag, FLFLAG, is used for this version. This means that you should 
only use one of these two macros for any particular program. 

We are now ready to add two new features to our directory program. 


The DIREC Program, Version 2 

Make a copy of the first version of the directory program shown in 
Figure 8.7 and alter it to look like the version shown in Figure 8.14. Macro 
FILLD is needed. Assemble the program and try it out. As with the 
previous version, if you execute this program without a parameter, the 
currently logged-in disk is used. However, if you want to select another 
disk, give the disk name followed by a colon. 

This new version begins by printing out the disk parameters, just as the 
previous version did. But then if you press any console key, the program 
will continue. Each directory entry is shown on a separate line. The user 
number, extent, number of records, and block addresses are included in 
this listing. Pressing any console key a second time will display the third 
part of the program—a block allocation map for the disk. Blocks that are 
in use will be designated by a value of 1 in the map. Blocks that are free 
are shown by zeros. 

Program DIREC begins like the previous one with macros ENTER, 
VERSN, and CPMVER. Subroutine CDISK is called to determine the 
default disk drive. BDOS function 25 is used for this task. A check is made 
to see if a disk drive was specified on the command line. If so, subroutine 
SETDSK is called as before. If no drive was specified, the default drive is 
coded in location FCB1. The drive name is also displayed on the console 
at that time. 

The disk parameters are displayed, as they were with the previous ver¬ 
sion. The program then waits for any key to be pressed. This causes the 
complete disk directory with the block addresses to be shown. When any 
other key is pressed, the block allocation map is displayed. 
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FILLD 

MACRO 

ADDR, BYTES, CHAR 

;;(Put current date here) 


;;(double precision version) 

;;lnline macro to fill BYTES memory 
;;locations with CHAR starting at ADDR. 

;;Usage: 

FILL 

FCB + 1, 8, blank 

/ / 

FILL 

FCB+9, 3,'?' 

/ / 

LOCAL 

AROUND, FILL3? 


PUSH 

H 


PUSH 

B 


IF 

NOT NUL ADDR 


LXI 

H,ADDR 


ENDIF 

IF 

NOT NUL BYTES 


LXI 

ENDIF 

B, BYTES 


MVI 

A,CHAR 


CALL 

FILL2? 


POP 

B 


POP 

H 


IF 

NOT FLFLAG 


JAAP 

AROUND 

FILL2?: 

PUSH 

D 


MOV 

D,A 

FILL3?: 

MOV 

M,D 


INX 

H 


DCX 

B 


MOV 

A,C 


ORA 

B 


JNZ 

FILL3? 


POP 

D 


RET 


FLFLAG 

SET 

ENDIF 

TRUE 

AROUND: 

ENDM 

;;FILLD 


Figure 8.13: Macro FILLD to Fill a Large Portion of Memory 
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TITLE ' 

DIREC, directory utility' 



(Put current date here) 



FALSE 

EQU 

0 


TRUE 

EQU 

NOT FALSE 


/ 

BOOT 

EQU 

0 


BDOS 

EQU 

5 

;BDOS entry point 

TPA 

EQU 

100H 


FCB 

EQU 

5CH 

;file control block 

FCB1 

EQU 

5CH 

;first file name 

FCB2 

EQU 

6CH 

;second file name 

DBUFF 

EQU 

80H 

;default buffer 

ABUFF 

EQU 

DBUFF 

;actual buffer 

UNUSED 

EQU 

0E5H 

;dir entry 


Set flags in main program so only one 



copy of certain subroutines will be generated. 


Place set lines before 

MACLIB call. 


[ 

iNFLAG 

SET 

FALSE 

;binary to ASCII bin 

Cl FLAG 

SET 

FALSE 

;input console char 

COFLAG 

SET 

FALSE 

;output console char 

CRFLAG 

SET 

FALSE 

;carr-ret/l i ne-f eed 

CXFLAG 

SET 

FALSE 

;binary to hex 

DEFLAG 

SET 

FALSE 

;binary to decimal 

DVFLAG 

SET 

FALSE 

; 16-bit divide 

FLFLAG 

SET 

FALSE 

;fill characters 

MLFLAG 

SET 

FALSE 

; 16-bit multiply in HL 

AAVFLAG 

SET 

FALSE 

;block move 

PRFLAG 

SET 

FALSE 

;print console 

;end of flags 



/ 


MACLIB 

CPMMAC 


ORG 

TPA 




Figure 8.14: Program DIREC to Display Disk Parameters and the 
Block Allocation Map 
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/ 

START: 





ENTER 




VERSN 

'(current date).DIREC.2' 


CPMVER 


;check version 


CPI 

20H 



JC 

ERRVER 

;wrong version 


PRINT 

'For disk drive 

/ 


CALL 

CDISK 

;get current disk 


LDA 

FCB1 



ORA 

A 

;drive specified? 


CNZ 

SETDSK 

;yes 


LDA 

CURD2 

requested drive 


STA 

FCB1 

;binary 


ADI 

'A' 

;convert to ASCII 


PCHAR 




CALL 

GETDPH 

;disk parameters 


CALL 

XAMINE 

;show them 


PRINT 

'Press any key 

to continue: ' 


READCH 


;wait for character 


CALL 

REPEAT 

;reset parameters 


CALL 

BLOCK 

;block map 


JAAP 

DONE 


/ 

;block move disk parameters to end of program 

/ 

GETDPH: 





AAVI 

C,31 

;disk param address 


CALL 

BDOS 



MOVE 

,DPARAA,15 

;copy to end 


LHLD 

BLKAAAX 

;maximum # blocks 


INX 

H 



SHLD 

BLKAAAX 

;starts at zero 


LHLD 

DIRENT 

;# of directory entries 


INX 

H 

;starts at zero 


DIVIDE 

4 

;convert to # sectors 

;Save number of directory sectors as 

16 bits 


SHLD 

DIRAAAX 

;and save 


Figure 8.14 (continued) 
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SHLD 

DIRMX2 

/count. 

r 

/Directory block allocation is stored as 


; 1000 0000 for 1 block, 1100 0000 for 2, etc. 

;But we want left byte in H. 


/ 

LHLD 

ALLOC 

/reverse bytes 


MOV 

A,L 



MOV 

L,H 



MOV 

H,A 



SHLD 

ALLOC 


;get number of directory blocks as ASCII 


XRA 

A 

/zero A 

XAM3: 

DAD 

H 

/shift left 


JNC 

XAM4 



INR 

A 



JMP 

XAM3 


XAM4: 

MOV 

E/A 

/# dir blocks 


MVI 

D/0 



LHLD 

BLKMAX 

/blocks 


SBC 

HL,DE 

/deduct for directory 


SHLD 

NETBL 

/net data blocks 


MOV 

A/E 



ORI 

'O' 

/ASCII bias 


STA 

ALLOCA 

/save 

/ 

/select disk and setup disk parameter header 

/ 

LDA 

FCB 



MOV 

C,A 



CALL 

SELDSK 

/select drive 


MOV 

A,H 

;HL has DPH 


ORA 

L 



JZ 

ILDISK 

/error, no disk 


MOV 

E,M 

/get translate table 


INX 

H 

/address 


Figure 8.14 (continued) 
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MOV 

D,M 

XCHG 


SHLD 

DPH ;save address 

RET 


/ 

;display disk parameters 

/ 

XAMINE: 


PRINT 

<CR,LF,'Sectors/track: '> 

LHLD 

NUMSEC 

HLDEC 

;decimal 

PCHAR 

BLANK 

PCHAR 

T 

OUTHL 


PRINT 

<' hex)', CR, LF, 'Sectors/block: '> 

LDA 

BLM 

INR 

A 

MOV 

L,A 

MVI 

H,0 

HLDEC 


PCHAR 

BLANK 

PCHAR 

T 

OUTHEX 

L 

PRINT 

' hex)' 

PRINT 

<CR,LF,'Block size: > 

DIVIDE 

8 

MOV 

B,L ;save block size 

HLDEC 


PRINT 

'K bytes' 

LHLD 

NETBL ;# data blocks 

MOV 

A,B ;block size 

MULT 


PRINT 

^R^F/Disk size: > 

HLDEC 


PRINT 

'K bytes' 

PRINT 

<CR,LF/Extents/entry: '> 

LDA 

EAAASK 

INR 

A 


Figure 8.14 (continued) 
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MOV 

L,A 

MVI 

H,0 

HLDEC 


PRINT 

<CR,LF,'Number of blocks: '> 

LHLD 

BLKAAAX 

HLDEC 


PCHAR 

BLANK 

PCHAR 


OUTHL 


PRINT 

<' hexJ'.CR'LF/Max directory entries: '> 

LHLD 

DIRENT 

INX 

H 

HLDEC 


PCHAR 

BLANK 

PCHAR 

T 

OUTHL 


PRINT 

<' hex)',CR,LF,'Directory blocks: '> 

LDA 

ALLOCA 

PCHAR 


PCHAR 

BLANK 

PCHAR 

T 

LDA 

ALLOC-hi 

BINBIN 

;alloc in binary 

LDA 

ALLOC 

ORA 

A 

JZ 

XAM2 

BINBIN 

;2nd if needed 

XAM2: 


PRINT 

<%CR,LF,'Track offset: > 

LHLD 

TRKOFF 

HLDEC 


MOV 

A,H 

ORA 

A 

JZ 

XAM5 ;skip hex 

PCHAR 

BLANK 

PCHAR 

T 

OUTHL 


PRINT 

' hex)' 


Figure 8.14 (continued) 
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XAM5: 






CRLF 





RET 



SETDSK: 



;set disk drive 



DCR 

A 

_Q 

II 

o' 

II 

o 



STA 

CURD2 

;save 



MOV 

E,A 




MVI 

C, 14 

;select new drive 



JMP 

BDOS 


! 

REPEAT: 



;reset parameters 



FILLD 

SECTOR, HERE-SECTOR,0 



LHLD 

TRKOFF 




SHLD 

TRACK 

;reset track offset 



LHLD 

DIRMAX 

;# directory sectors 



SHLD 

DIRMX2 




RET 




show block allocation map 


1 

3LOCK: 





Set reserved directory blocks in map 
by shifting alloc to left. 




PRINT 

<CR,LF,LF,' disk allocation map',CR,LF> 



LHLD 

BLKMAX 

;number of blocks 



MOV 

B,H 




MOV 

C,L 

;put in BC 



FILLD 

BMAP, , 0 

;zero map area 



LHLD 

ALLOC 

;both bytes 



LXI 

D,BMAP 

/location 

C14A: 






XCHG 

INR 

M 

;set bit 



INX 

XCHG 

H 




DAD 

H 

/shift left 


Figure 8.14 (continued) 
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MOV 

A,L 



ORA 

H 

/zero 


JNZ 

C14A 

/no 

BLOCK3: 





CALL 

NXTSEC 



JZ 

BLOCK4 

/finished 


CALL 

BPROG 



JMP 

BLOCK3 


/ 

/display disk allocation map 


BLOCK4: 





PRINT 

'Press any key to continue: ' 


READCH 


;wait for character 


PRINT 

<CR,LF,LF/ 

01234567 89ABCDEF'> 


PRINT 

'01234567 89ABCDEF' 


LHLD 

BLKMAX 



MOV 

B,H 



MOV 

C,L 



LXI 

h,bmap 

/start of map 

BMAP2: 





MOV 

A,L 



ANI 

OFH 

/mask upper 4 bits 


JNZ 

BAAAP6 



MOV 

A,L 



ANI 

1FH 



JZ 

BAAAP7 

/mask 4 bits 


PCHAR 

BLANK 

/even 


JMP 

BAAAP5 


BAAAP7: 





ABORT 

ESC 



CRLF 


/start new line 


OUTHEX 

L 

/show address 


PCHAR 

/ # / 



PCHAR 

BLANK 



JMP 

BAAAP5 


BMAP6: 





CPI 

8 



Figure 8.14 (continued) 
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JNZ 

BAAAP5 



PCHAR 

BLANK 


BAAAP5: 





MOV 

A,AA 

;get entry 


ORA 

A 

;zero? 


JZ 

BAAAP8 

;yes 


XCHG 


;save HL in DE 


LHLD 

BLKCNT 



INX 

H 

;use count 


SHLD 

BLKCNT 



XCHG 


;restore HL 

BAAAP8: 





CPI 

10 



JNC 

BAAAP3 

;<9 


ORI 

'0' 

;make ASCII 


JAAP 

BMAP4 


BAAAP3: 





ADI 

o 

T 

< 

;make hex 

BAAAP4: 





PCHAR 


/'print 


INX 

H 



DCX 

B 

;count 


AAOV 

A,C 

;done? 


ORA 

B 



JNZ 

BAAAP2 

;no 

;show total number of 

blocks and number in use 

/ 

CRLF 




LHLD 

NETBL 

;net # blocks 


HLDEC 




PUSH 

H 

;save HL 


PRINT 

' total blocks, ' 



LHLD 

BLKCNT 



LDA 

ALLOCA 

;dir blocks 


SUI 

'O' 

;make binary 


AAOV 

E,A 



Figure 8.14 (continued) 
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MVI 

D,0 



SBC 

HL,DE 



HLDEC 




PRINT 

' in use, ' 



XCHG 




POP 

H 



SBC 

HL,DE 

difference 


HLDEC 




PRINT 

<' remaining' / CR,LF> 


RET 



/ 

;code for setting up block allocation 

map 

, 

BPROG: 





CALL 

E5AREA 

;found E5? 


MOV 

A,M 

;first byte 


CPI 

17 

;user >16? 


JNC 

BKINCD 

;yes 


PUSH 

H 

;save pointer 

/ 

OUTHEX 


;user number 


PCHAR 

BLANK 



INX 

H 

;file name 


PRINT 

,11 

/display file name 


PCHAR 

BLANK 



LXI 

DJI 

/move past file name 


DAD 

D 

/first entry 


MVI 

C,4 

/next 4 bytes 

/ 

;next 4 bytes have extent and number of sectors 

LOOP2: 





OUTHEX 

M 



INX 

H 



DCR 

C 



JNZ 

LOOP2 



PCHAR 

BLANK 



Figure 8.14 (continued) 
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AAV 1 

C,16 

;16 blocks/extent 


See if there are more than 255 blocks. 



A 16-bit block address is used if so. 



LDA 

BLKAAAX +1 

;high half 

ORA 

A 

;zero? 

JNZ 

BNEXT6 

;no, 16 bits 


code for 8-bit block addresses 


BNEXT8: 



MOV 

A,M 

;get byte 

OUTHEX 


;display block number 

ORA 

A 

;zero? 

JZ 

BPRT2 

;last block 

PUSH 

H 


LXI 

H,BAAAP 

;start 

MOV 

E,A 


MV 1 

D,0 


DAD 

D 

; offset 

INR 

M 

;show use 

POP 

H 


INX 

H 


MOV 

A,L 


ANI 

OFH 

;end of line 

JNZ 

BNEXT8 

;no 

JMP 

BPRT2 



16-bit block addresses 



BNEXT6: 



MOV 

E,M 

;low byte 

OUTHEX 

E 

;block number, low 

INX 

H 


MOV 

A,M 

;high 

OUTHEX 


;block number, high 

ORA 

E 

;zero? 


Figure 8.14 (continued) 
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JZ 

BPRT2 

/yes, quit 

MOV 

D,M 


PUSH 

H 

/save pointer 

LXI 

H,BMAP 

/map start 

DAD 

D 

/add address 

INR 

M 

/show use 

POP 

H 

/restore pointer 

INX 

H 

/next location 

MOV 

A,L 


ANI 

OFH 

/end of line? 

JNZ 

BNEXT6 

/no 

BPRT2: 



POP 

H 

/beginning of FCB 

CRLF 


/new line 

BKINCD: 



CALL 

DECCNT 


JZ 

CKDONE 


LXI 

D,32 

;FCB length 

DAD 

D 

/next entry 

JMP 

BPROG 


/ 

/increment count, decrement sector number 

/ 

CKDONE: 



LHLD 

DIRMX2 


DCX 

H 

/sector count 

SHLD 

DIRMX2 


LHLD 

SECTOR 

;16 bits 

INX 

H 


SHLD 

SECTOR 


XCHG 


/save in DE 

LHLD 

NUMSEC 

/sectors/track 

;see if we need another track 


/ 

SBC 

HL,DE 

/difference 

MOV 

A,L 


ORA 

H 

/difference zero? 


Figure 8.14 (continued) 
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RNZ 




SHLD 

SECTOR 

;set to zero 


LHLD 

TRACK 



INX 

H 

;incr track 


SHLD 

TRACK 



RET 



$ 

;Read next sector (4 directory entries). 
;Return with zero flag set if no more. 


NXTSEC: 

LDA 

E5FLAG 

uninitialized found? 


CPI 

1 



RZ 


;yes 

NXTSF: 

LHLD 

DIRMX2 

;more sectors? 


MOV 

A,L 



ORA 

H 

;set flags 


RZ 


;no 


CALL 

SETTRK 

;set track 


LHLD 

SECTOR 

;16 bits 


MOV 

B,H 



MOV 

C,L 



CALL 

TRANSL 



CALL 

SETSEC 

;set sector 


CALL 

READ 



MVI 

A, 4 

;entries/sector 


STA 

ECOUNT 

; reset 


LXI 

H,ABUFF 

;DMA address 


ANI 

1 



XRI 

1 

;invert error flag 


RET 


;zero if bad flag 

/ 

;Decrement number of remaining entries in sector 
;(4 maximum). Zero flag set if no more. 

DECCNT: 

LDA 

ECOUNT 

;entries/sector 


DCR 

A 



Figure 8.14 (continued) 
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STA 

ECOUNT 


RET 



/ 

;look for E5 uninitialized area, set E5FLAG = 1 if so 

/ 

E5AREA: 



INX 

H 

;1 st char 

INX 

H 

;2nd char 

MOV 

A,M 


CPI 

UNUSED 


DCX 

H 


DCX 

H 


RNZ 


;not found 

MVI 

A,1 


STA 

E5FLAG 

;set flag 

RET 



/ 

;find currently logged-in disk 


CDISK: 



MVI 

C,25 


CALL 

BDOS 


STA 

CURD2 

/A=0, B= 1 

ADI 

'A' 

/convert to ASCII 

STA 

CURDSK 


RET 



translate BC from logical to physical 


;sector number BC 

=> HL => BC 


TRANSL: 



LHLD 

DPH 

/translate table 

XCHG 



CALL 

SECTRN 


MOV 

B,H 


MOV 

C,L 


RET 

/ 




Figure 8.14 (continued) 
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;set track to 16-bit value in BC 


/ 

SETTRK: 





LHLD 

TRACK 

;16 bits 


MOV 

B,H 

;may be zero 


MOV 

C,L 



LHLD 

BOOT+1 

;warm boot 


PUSH 

D 



LXI 

D,3*9 

; offset 


DAD 

D 



POP 

D 



PCHL 



SETSEC: 



;select sector in BC 


LHLD 

BOOT+1 

;warm boot 


PUSH 

D 



LXI 

D,3*10 

;offset 


DAD 

D 



POP 

D 



PCHL 



SELDSK: 



;select disk in C 


LHLD 

BOOT + 1 

;warm boot 


PUSH 

D 



LXI 

D,3*8 

;offset 


DAD 

D 



POP 

D 



PCHL 



;read sector, A = ( 

D if successful 


READ: 





LHLD 

BOOT+1 

;warm boot 


PUSH 

D 



LXI 

D,3*12 

; offset 


DAD 

D 



POP 

D 



PCHL 



;write sector, A = 

0 if successful 


WRITE: 





LHLD 

BOOT+1 

;warm boot 


PUSH 

D 



Figure 8.14 (continued) 
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LXI 

D,3*13 

/offset 


DAD 

D 



POP 

D 



PCHL 



/ 

/Sector translation 

from logical sector in BC 

;to physical sector 

in HL, DE has translate table. 

SECTRN: 





LHLD 

BOOT+1 

/warm boot 


PUSH 

D 



LXI 

D,3*15 

/offset 


DAD 

D 



POP 

D 



PCHL 



/ 

ERRVER: 





ERRORM '?CP/M version must be 2 or greater' 

ILDISK: 





ERRORM '?l 1 legal disk drive' 

DONE: 





EXIT 



/ 

DPARM: 



/copy of disk parameters 

NUMSEC: 

DS 

2 

/sectors per track 

BSHIFT: 

DS 

1 

/block shift 

BLM: 

DS 

1 

/block mask 

EAAASK: 

DS 

1 

/extent mask 

BLKAAAX: 

DS 

2 

/max # blocks on disk 

DIRENT: 

DS 

2 

/max # dir entries 

ALLOC: 

DS 

2 

/A11,A10 reversed 

CKS: 

DS 

2 

/check size 

TRKOFF: 

DS 

2 

/track offset 

DPH: 

DS 

2 

/disk parameter header 

/ 

DIRMAX: 

DS 

2 

/max # directory sectors 

NETBL: 

DS 

2 

/number of data blocks 

ALLOCA: 

DS 

1 

/directory blocks (ASCII) 


Figure 8.14 (continued) 
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DIRMX2: 

DS 

2 

remaining direct sectors 

CURDSK: 

DS 

1 

;current disk (ASCII) 

CURD2: 

DS 

1 

;current disk (binary) 

ECOUNT: 

DS 

1 

;entries in sector (0-3) 

SECTOR: 

DS 

2 

;current sector 

TRACK: 

DS 

2 

;current track 

E5FLAG: 

DS 

1 

;found uninitialized if 1 

BLKCNT: 

DS 

2 

;blocks in use 

HERE: 

ORG 

(here 

and 0FF00H)’ 4- 100H 

;replace with ASEG: 

;ORG 0A00H for Microsoft 

BMAP: 

DS 

1 

;block allocation map 


END 

START 



Figure 8.14 (continued) 


This program will perform several disk operations by directly calling 
the BIOS rather than the BDOS. Recall that the BIOS begins with a se¬ 
quence of jump vectors. In this case we are interested in the vectors that 
are 8, 9, 10, 12, 13, and 15 positions from the warm-start vector. These 
are the following vectors: 


JMP 

SELDSK 

JMP 

SETTRK 

JMP 

SETSEC 

JMP 

READ 

JMP 

WRITE 

JMP 

SECTRN 


Select disk drive from register C 

Set track number to value in BC 

Set sector number to value in BC 

Read a sector into memory at DMA address 

Write a sector from memory at DAAA address 

Translate from logical to physical sector 


The location of BIOS changes with each different size of CP/M. Conse¬ 
quently, the exact addresses cannot be coded directly into our program. 

The address of the warm-start vector is stored at address 1. We can re¬ 
trieve this address, add the offset to the desired vector, then branch to it. 
For example, the vector to select the disk is eight vectors past the warm- 
start vector, and each vector is three bytes long. Consequently, we need to 
add 3 times 8 to the warm-start vector. The instructions are as follows: 

;select disk in C 

LHLD BOOT +1 ;warm boot to HL 


SELDSK: 
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PUSH 

D 

;save DE 

LXI 

D,3*8 

;put offset in DE 

DAD 

D 

;add to HL 

POP 

D 

;restore DE 

PCHL 


;branch to HL address 


The other five routines operate in a similar way. 

Each time a disk is logged in, CP/M constructs a bit map of the sectors 
in use. However, we will not use this map in our program. Rather, we will 
construct a separate table. A block of memory starting at BMAP at the 
end of the program is set aside for this purpose. We saw previously that 
CP/M allocates one bit for each block. However, in this case we will use 
one byte for each block. The map area is zeroed initially. Then each time 
a block number is encountered, the corresponding location in the block 
is incremented. 

We start with the blocks allocated to the directory. Then each directory 
entry is scanned for blocks that are in use. When a block is found to be in 
use, the corresponding entry in the table is incremented. 


SUMMARY 

In this chapter we studied the CP/M disk directory in detail. We 
developed a disk program to list the disk parameters, show an expanded 
directory with the block addresses, and generate a block allocation map. 
We can add more features to this program to further increase its 
usefulness. For example, an accidentally deleted file can be recovered if 
the value at the beginning of the FCB can be changed from E5 to 0. 

Creating multiple links to a single file is another useful feature if more 
than one user area is active. If a particular program is needed in more than 
one user area, it is usually necessary to save a separate copy of the program 
for each user. But this requires additional disk space. On the other hand, 
disk space can be saved by creating multiple FCBs to the same file. One 
FCB is designated for each user according to the initial byte of the FCB. 
However, the remainder of each FCB is the same. Thus all of these FCBs 
refer to the same file. (All of these features are incorporated into a disk 
utility program called FILEFIX, available commercially.) 

The directory of your macro library should now look like this: 

;;Macros in this library Flags 

;; ABORT MACRO CHAR Cl FLAG, COFLAG 

;;AMBIG MACRO OLD, NEW (none) 
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;;BINBIN 

AAACRO 


BNFLAG 

;;CLOSE 

/ / 

// 

AAACRO 

POINTR 

CLFLAG, COFLAG, CRFLAG 
PRFLAG, OPFLAG, AAVFLAG, 
DEFLAG, CIFLAG, UNFLAG, 
RNFLAG, S2FLAG 

••COAAPAR 

AAACRO 

FIRST, SECOND, BYTES 

CAAFLAG 

;;COAAPRA 

AAACRO 

FIRST, SECOND, BYTES 

CAAFLAG 

;;CPAAVER 

AAACRO 


(none) 

;;CRLF 

AAACRO 


CRFLAG, COFLAG 

;;DELETE 

AAACRO 

POINTR, WHERE 

DEFLAG, CIFLAG 

COFLAG, PRFLAG, UNFLAG 

"DIVIDE 

AAACRO 

DENOAA 

DVFLAG 

;;ENTER 

AAACRO 


(none) 

;;ERRORM 

AAACRO 

TEXT, WHERE 

COFLAG, CRFLAG, PRFLAG 

;;EXIT 

AAACRO 

SPACE? 

(none) 

;;FILL 

AAACRO 

ADDR, BYTES, CHAR 

FLFLAG 

;;FILLD 

AAACRO 

ADDR, BYTES, CHAR 

FLFLAG 

;;GFNAME 

AAACRO 

FCB 

FNFLAG, FLFLAG, RCFLAG 
COFLAG, CRFLAG, PRFLAG 

;;HEXHL 

AAACRO 

POINTR 

HXFLAG, RCFLAG 

;;HLDEC 

AAACRO 


DEFLAG, COFLAG 

;;LCHAR 

AAACRO 

PAR 

LOFLAG 

;;LDFILE 

AAACRO 

FCB, POINTR, CHAR 

COFLAG, DAAFLAG 

RDFLAG 

;;AAAKE 

AAACRO 

POINTR 

AAKFLAG, COFLAG, CRFLAG, 
PRFLAG 

;;AAOVE 

AAACRO 

FROAA, TO, BYTES 

AAVFLAG 

;;MULT 

AAACRO 

TIAAES 

AALFLAG 

;;OPEN 

AAACRO 

POINTR, WHERE 

OPFLAG, COFLAG, PRFLAG 
CRFLAG 

;;OUTHEX 

AAACRO 

REG 

CXFLAG, COFLAG 

;;OUTHL 

AAACRO 


CXFLAG, COFLAG 

;;PCHAR 

AAACRO 

PAR 

COFLAG 

;;PFNAME 

AAACRO 

FCB 

COFLAG, PRFLAG 

;;PRINT 

AAACRO 

TEXT, BYTES 

PRFLAG, COFLAG 

;; PROTEC 

AAACRO 

POINTR 

(none) 

;;READB 

AAACRO 

BUFFR 

RCFLAG 

;;READCH 

AAACRO 

REG 

CIFLAG, COFLAG 

;; READS 

AAACRO 

POINTR, STAR 

RDFLAG, COFLAG 

;;RENAME 

AAACRO 

POINTR 

RNFLAG, COFLAG 

PRFLAG, CRFLAG 
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SBC 

MACRO 


(none) 

SETDMA 

AAACRO 

POINTR 

DMFLAG 

SETUP2 

MACRO 


S2FLAG, CIFLAG, COFLAG, 
CRFLAG, CMFLAG, DEFLAG, 
MKFLAG, MVFLAG, OPFLAG, 
PRFLAG, UNFLAG 

SYSF 

AAACRO 

FUNC, AE 

(none) 

UCASE 

AAACRO 

REG 

(none) 

UNFLAG 

UNPROT 

AAACRO 

POINTR 

UPPER 

AAACRO 

REG 

(none) 

(none) 

VERSN 

AAACRO 

NUM 

WRITES 

AAACRO 

POINTR, STAR 

WRFLAG, COFLAG 

PRFLAG 

WRFILE 

MACRO 

FCB, POINTR 

COFLAG, CRFLAG 

DMFLAG, WRFLAG 
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APPENDIX A 


The ASCII 
Character Set 


The ASCII character set is listed here in numeric order with the corre¬ 
sponding decimal, hexadecimal, and octal values. The control characters 
are indicated with a caret ( A ). For example, the horizontal tab (HT) is 
formed with control-I ( A I). 


ASCII 

symbol 

Decimal 

value 

Hex 

value 

Octal 

value 

Control 

character 

Meaning 

NUL 

0 

00 

000 

A @ 

Null 

SOH 

1 

01 

001 

a A 

Start of heading 

STX 

2 

02 

002 

a b 

Start of text 

ETX 

3 

03 

003 

A c 

End of text 

EOT 

4 

04 

004 

a d 

End of transmission 

ENQ 

5 

05 

005 

a e 

Inquiry 

ACK 

6 

06 

006 

a f 

Acknowledge 

BEL 

7 

07 

007 

a g 

Bell 

BS 

8 

08 

010 

a h 

Backspace 

HT 

9 

09 

011 

A I 

Horizontal tab 

LF 

10 

0A 

012 

A J 

Line feed 

VT 

11 

0B 

013 

a k 

Vertical tab 

FF 

12 

OC 

014 

a l 

Form feed 

CR 

13 

0D 

015 

a m 

Carriage return 
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ASCII 

symbol 

Decimal 

value 

Hex 

value 

Octal 

value 

Control 

character 

Meaning 

SO 

14 

0E 

016 

a n 

Shift out 

SI 

15 

OF 

017 

A o 

Shift in 

DLE 

16 

10 

020 

A P 

Data link escape 

DC1 

17 

11 

021 

a q 

Device control 1 

DC2 

18 

12 

022 

a r 

Device control 2 

DC3 

19 

13 

023 

A s 

Device control 3 

DC4 

20 

14 

024 

Aj 

Device control 4 

NAK 

21 

15 

025 

A u 

Negative acknowledge 

SYN 

22 

16 

026 

A v 

Synchronous idle 

ETB 

23 

17 

027 

A w 

End of transmission block 

CAN 

24 

18 

030 

A x 

Cancel 

EM 

25 

19 

031 

a y 

End of medium 

SUB 

26 

1A 

032 

A z 

Substitute 

ESC 

27 

IB 

033 

A [ 

Escape 

FS 

28 

1C 

034 

A \ 

File separator 

GS 

29 

ID 

035 

A ] 

Group separator 

RS 

30 

IE 

036 

AA 

Record separator 

US 

31 

IF 

037 

A_ 

Unit separator 

SP 

32 

20 

040 


Space 

f 

33 

21 

041 



<< 

34 

22 

042 



# 

35 

23 

043 



$ 

36 

24 

044 



<7o 

37 

25 

045 



& 

38 

26 

046 



9 

39 

27 

047 


Apostrophe 

( 

40 

28 

050 



) 

41 

29 

051 



* 

42 

2A 

052 



+ 

43 

2B 

053 



» 

44 

2C 

054 


Comma 

— 

45 

2D 

055 


Minus 

. 

46 

2E 

056 


Period 

/ 

47 

2F 

057 



0 

48 

30 

060 



1 

49 

31 

061 



2 

50 

32 

062 



3 

51 

33 

063 
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ASCII Decimal Hex Octal Control 

symbol value value value character Meaning 


4 

52 

34 

064 

5 

53 

35 

065 

6 

54 

36 

066 

7 

55 

37 

067 

8 

56 

38 

070 

9 

57 

39 

071 

• 

58 

3A 

072 

> 

59 

3B 

073 

< 

60 

3C 

074 

= 

61 

3D 

075 

> 

62 

3E 

076 

? 

63 

3F 

077 

@ 

64 

40 

100 

A 

65 

41 

101 

B 

66 

42 

102 

C 

67 

43 

103 

D 

68 

44 

104 

E 

69 

45 

105 

F 

70 

46 

106 

G 

71 

47 

107 

H 

72 

48 

110 

I 

73 

49 

111 

J 

74 

4A 

112 

K 

75 

4B 

113 

L 

76 

4C 

114 

M 

77 

4D 

115 

N 

78 

4E 

116 

O 

79 

4F 

117 

P 

80 

50 

120 

Q 

81 

51 

121 

R 

82 

52 

122 

S 

83 

53 

123 

T 

84 

54 

124 

U 

85 

55 

125 

V 

86 

56 

126 

w 

87 

57 

127 

X 

88 

58 

130 

Y 

89 

59 

131 
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ASCII Decimal Hex Octal Control 

symbol value value value character Meaning 


z 

90 

5A 

[ 

91 

5B 

\ 

92 

5C 

] 

93 

5D 

A 

94 

5E 

— 

95 

5F 

% 

96 

60 

a 

97 

61 

b 

98 

62 

c 

99 

63 

d 

100 

64 

e 

101 

65 

f 

102 

66 

g 

103 

67 

h 

104 

68 

i 

105 

69 

j 

106 

6A 

k 

107 

6B 

1 

108 

6C 

m 

109 

6D 

n 

110 

6E 

o 

111 

6F 

P 

112 

70 

q 

113 

71 

r 

114 

72 

s 

115 

73 

t 

116 

74 

u 

117 

75 

V 

118 

76 

w 

119 

77 

X 

120 

78 

y 

121 

79 

z 

122 

7A 

{ 

123 

7B 

1 

124 

1C 

} 

125 

ID 


126 

IE 

DEL 

127 

IF 


132 

133 

134 

135 

136 

137 Underline 

140 

141 

142 

143 

144 

145 

146 

147 

150 

151 

152 

153 

154 

155 

156 

157 

160 
161 
162 

163 

164 

165 

166 
167 

170 

171 

172 

173 

174 

175 

176 

177 


Delete 
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A 64K 

Memory Map 


The 8080 and Z80 microprocessors can directly address 64K bytes of 
memory. The memory area is mapped out in the chart that follows. Each 
entry represents a 256-byte block. The high-order byte of the address is 
given first as a hexadecimal value, then as an octal value. For example, the 
entry 

Hex Oct K m 

20 040 32 

represents an address range of 2000 to 2FFF hex, or 040-000 to 040-777 
octal. The third column gives the decimal number of IK blocks. The 
fourth column is the decimal number of 256-byte blocks starting at ad¬ 
dress 100 hex. As an example, suppose that a CP/M program runs from 
100 hex to 3035 hex. The 30 hex entry in the table shows that the program 
contains 48 decimal blocks of 256 bytes. The program can be saved with 
the CP/M command 

A>SAVE 48 (file name) 


Hex 

Oct 

K 

B1 

Hex 

Oct 

K 

B1 

00 

000 


0 

0B 

013 

3 

11 

01 

001 


1 

OC 

014 


12 

02 

002 


2 

0D 

015 


13 

03 

003 

1 

3 

0E 

016 


14 

04 

004 


4 

OF 

017 

4 

15 

05 

005 


5 





06 

006 


6 

10 

020 


16 

07 

007 

2 

7 

11 

021 


17 





12 

022 


18 

08 

010 


8 

13 

023 

5 

19 

09 

Oil 


9 

14 

024 


20 

0A 

012 


10 

15 

025 


21 
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Hex 

Oct 

K 

B1 

Hex 

Oct 

K 

B1 

16 

026 


22 

3D 

075 


61 

17 

027 

6 

23 

3E 

076 


62 

18 

030 


24 

3F 

077 

16 

63 

19 

031 


25 

40 

100 


64 

1A 

032 


26 

41 

101 


65 

IB 

033 

7 

27 

42 

102 


66 

1C 

034 


28 

43 

103 

17 

67 

ID 

035 


29 

44 

104 


68 

IE 

036 


30 

45 

105 


69 

IF 

037 

8 

31 

46 

106 


70 

20 

040 


32 

47 

107 

18 

71 

21 

041 


33 

48 

110 


72 

22 

042 


34 

49 

111 


73 

23 

043 

9 

35 

4A 

112 


74 

24 

044 


36 

4B 

113 

19 

75 

25 

045 


37 

4C 

114 


76 

26 

046 


38 

4D 

115 


77 

27 

047 

10 

39 

4E 

116 


78 

28 

050 


40 

4F 

117 

20 

79 

29 

051 


41 

50 

120 


80 

2A 

052 


42 

51 

121 


81 

2B 

053 

11 

43 

52 

122 


82 

2C 

054 


44 

53 

123 

21 

83 

2D 

055 


45 

54 

124 


84 

2E 

056 


46 

55 

125 


85 

2F 

057 

12 

47 

56 

126 


86 

30 

060 


48 

57 

127 

22 

87 

31 

061 


49 

58 

130 


88 

32 

062 


50 

59 

131 


89 

33 

063 

13 

51 

5A 

132 


90 

34 

064 


52 

5B 

133 

23 

91 

35 

065 


53 

5C 

134 


92 

36 

066 


54 

5D 

135 


93 

37 

067 

14 

55 

5E 

136 


94 

38 

070 


56 

5F 

137 

24 

95 

39 

071 


57 

60 

140 


96 

3A 

072 


58 

61 

141 


97 

3B 

073 

15 

59 

62 

142 


98 

3C 

074 


60 

63 

143 

25 

99 













322 MASTERING CP/M 


Hex 

Oct 

K 

B1 

Hex 

Oct 

K 

B1 

64 

144 


100 

8B 

213 

35 

139 

65 

145 


101 

8C 

214 


140 

66 

146 


102 

8D 

215 


141 

67 

147 

26 

103 

8E 

216 


142 

68 

150 


104 

8F 

217 

36 

143 

69 

151 


105 

90 

220 


144 

6A 

152 


106 

91 

221 


145 

6B 

153 

27 

107 

92 

222 


146 

6C 

154 


108 

93 

223 

37 

147 

6D 

155 


109 

94 

224 


148 

6E 

156 


110 

95 

225 


149 

6F 

157 

28 

111 

96 

226 


150 

70 

160 


112 

97 

227 

38 

151 

71 

161 


113 

98 

230 


152 

72 

162 


114 

99 

231 


153 

73 

163 

29 

115 

9A 

232 


154 

74 

164 


116 

9B 

233 

39 

155 

75 

165 


117 

9C 

234 


156 

76 

166 


118 

9D 

235 


157 

77 

167 

30 

119 

9E 

236 


158 

78 

170 


120 

9F 

237 

40 

159 

79 

171 


121 

AO 

240 


160 

7A 

172 


122 

A1 

241 


161 

7B 

173 

31 

123 

A2 

242 


162 

7C 

174 


124 

A3 

243 

41 

163 

7D 

175 


125 

A4 

244 


164 

7E 

176 


126 

A5 

245 


165 

7F 

177 

32 

127 

A6 

246 


166 

80 

200 


128 

A7 

247 

42 

167 

81 

201 


129 

A8 

250 


168 

82 

202 


130 

A9 

251 


169 

83 

203 

33 

131 

AA 

252 


170 

84 

204 


132 

AB 

253 

43 

171 

85 

205 


133 

AC 

254 


172 

86 

206 


134 

AD 

255 


173 

87 

207 

34 

135 

AE 

256 


174 

88 

210 


136 

AF 

257 

44 

175 

89 

211 


137 

BO 

260 


176 

8A 

212 


138 

B1 

261 


177 











A 64K MEMORY MAP 323 


Hex 

Oct 

K 

B1 

B2 

262 


178 

B3 

263 

45 

179 

B4 

264 


180 

B5 

265 


181 

B6 

266 


182 

B7 

267 

46 

183 

B8 

270 


184 

B9 

271 


185 

BA 

272 


186 

BB 

273 

47 

187 

BC 

274 


188 

BD 

275 


189 

BE 

276 


190 

BF 

277 

48 

191 

CO 

300 


192 

Cl 

301 


193 

C2 

302 


194 

C3 

303 

49 

195 

C4 

304 


196 

C5 

305 


197 

C6 

306 


198 

Cl 

307 

50 

199 

C8 

310 


200 

C9 

311 


201 

CA 

312 


202 

CB 

313 

51 

203 

CC 

314 


204 

CD 

315 


205 

CE 

316 


206 

CF 

317 

52 

207 

DO 

320 


208 

D1 

321 


209 

D2 

322 


210 

D3 

323 

53 

211 

D4 

324 


212 

D5 

325 


213 

D6 

326 


214 

D7 

327 

54 

215 

D8 

330 


216 


Hex 

Oct 

K 

B1 

D9 

331 


217 

DA 

332 


218 

DB 

333 

55 

219 

DC 

334 


220 

DD 

335 


221 

DE 

336 


222 

DF 

337 

56 

223 

E0 

340 


224 

El 

341 


225 

E2 

342 


226 

E3 

343 

57 

227 

E4 

344 


228 

E5 

345 


229 

E6 

346 


230 

E7 

347 

58 

231 

E8 

350 


232 

E9 

351 


233 

EA 

352 


234 

EB 

353 

59 

235 

EC 

354 


236 

ED 

355 


237 

EE 

356 


238 

EF 

357 

60 

239 

F0 

360 


240 

FI 

361 


241 

F2 

362 


242 

F3 

363 

61 

243 

F4 

364 


244 

F5 

365 


245 

F6 

366 


246 

F7 

367 

62 

247 

F8 

370 


248 

F9 

371 


249 

FA 

372 


250 

FB 

373 

63 

251 

FC 

374 


252 

FD 

375 


253 

FE 

376 


254 

FF 

377 

64 

255 

















APPENDIX C 

The 8080 
Instruction Set 
Alphabetic 


The 8080 instruction set is listed alphabetically with the correspond¬ 
ing hexadecimal code. The following representations apply: 

nn 8-bit parameter 
nnnn 16-bit parameter 


Hex 

Mnemonic 

Hex 


Mnemonic 

CE nn 

ACI 

nn 

86 


ADD 

M 

8F 

ADC 

A 

C6 

nn 

ADI 

nn 

88 

ADC 

B 

A7 


ANA 

A 

89 

ADC 

C 

A0 


ANA 

B 

8A 

ADC 

D 

A1 


ANA 

C 

8B 

ADC 

E 

A2 


ANA 

D 

8C 

ADC 

H 

A3 


ANA 

E 

8D 

ADC 

L 

A4 


ANA 

H 

8E 

ADC 

M 

A5 


ANA 

L 

87 

ADD 

A 

A6 


ANA 

M 

80 

ADD 

B 

E6 

nn 

ANI 

nn 

81 

ADD 

C 

CD 

nnnn 

CALL 

nnnn 

82 

ADD 

D 

DC 

nnnn 

CC 

nnnn 

83 

ADD 

E 

FC 

nnnn 

CM 

nnnn 

84 

ADD 

H 

2F 


CMA 


85 

ADD 

L 

3F 


CMC 

























































THE 8080 INSTRUCTION SET (ALPHABETIC) 325 


Hex 


Mnemonic 

Hex 


Mnemonic 

BF 


CMP 

A 

24 


INR 

H 

B8 


CMP 

B 

2C 


INR 

L 

B9 


CMP 

C 

34 


INR 

M 

BA 


CMP 

D 

03 


INX 

B 

BB 


CMP 

E 

13 


INX 

D 

BC 


CMP 

H 

23 


INX 

H 

BD 


CMP 

L 

33 


INX 

SP 

BE 


CMP 

M 

DA 

nnnn 

JC 

nnnn 

D4 

nnnn 

CNC 

nnnn 

FA 

nnnn 

JM 

nnnn 

C4 

nnnn 

CNZ 

nnnn 

C3 

nnnn 

JMP 

nnnn 

F4 

nnnn 

CP 

nnnn 

D2 

nnnn 

JNC 

nnnn 

EC 

nnnn 

CPE 

nnnn 

C2 

nnnn 

JNZ 

nnnn 

FE 

nn 

CPI 

nn 

F2 

nnnn 

JP 

nnnn 

E4 

nnnn 

CPO 

nnnn 

EA 

nnnn 

JPE 

nnnn 

cc 

nnnn 

CZ 

nnnn 

E2 

nnnn 

JPO 

nnnn 

27 


DAA 


CA 

nnnn 

JZ 

nnnn 

09 


DAD 

B 

3A 

nnnn 

LDA 

nnnn 

19 


DAD 

D 

0A 


LDAX 

B 

29 


DAD 

H 

1A 


LDAX 

D 

39 


DAD 

SP 

2A 

nnnn 

LHLD 

nnnn 

3D 


DCR 

A 

01 

nnnn 

LXI 

B,nnnn 

05 


DCR 

B 

11 

nnnn 

LXI 

D,nnnn 

0D 


DCR 

C 

21 

nnnn 

LXI 

H,nnnn 

15 


DCR 

D 

31 

nnnn 

LXI 

SP,nnnn 

ID 


DCR 

E 

7F 


MOV 

A,A 

25 


DCR 

H 

78 


MOV 

A,B 

2D 


DCR 

L 

79 


MOV 

A,C 

35 


DCR 

M 

7A 


MOV 

A,D 

OB 


DCX 

B 

7B 


MOV 

A,E 

IB 


DCX 

D 

7C 


MOV 

A,H 

2B 


DCX 

H 

7D 


MOV 

A,L 

3B 


DCX 

SP 

7E 


MOV 

A,M 

F3 


DI 


47 


MOV 

B,A 

FB 


El 


40 


MOV 

B,B 

76 


HLT 


41 


MOV 

B,C 

DB 

nn 

IN 

nn 

42 


MOV 

B,D 

3C 


INR 

A 

43 


MOV 

B,E 

04 


INR 

B 

44 


MOV 

B,H 

OC 


INR 

C 

45 


MOV 

B,L 

14 


INR 

D 

46 


MOV 

B,M 

1C 


INR 

E 

4F 


MOV 

C,A 











326 MASTERING CP/M 


Hex 

Mnemonic 

Hex 


Mnemonic 

48 

MOV 

C,B 

71 


MOV 

M,C 

49 

MOV 

C,C 

72 


MOV 

M,D 

4A 

MOV 

C,D 

73 


MOV 

M,E 

4B 

MOV 

C,E 

74 


MOV 

M,H 

4C 

MOV 

C,H 

75 


MOV 

M,L 

4D 

MOV 

C,L 

3E 

nn 

MVI 

A,nn 

4E 

MOV 

C,M 

06 

nn 

MVI 

B,nn 

57 

MOV 

D,A 

0E 

nn 

MVI 

C,nn 

50 

MOV 

D,B 

16 

nn 

MVI 

D,nn 

51 

MOV 

D,C 

IE 

nn 

MVI 

E,nn 

52 

MOV 

D,D 

26 

nn 

MVI 

H,nn 

53 

MOV 

D,E 

2E 

nn 

MVI 

L,nn 

54 

MOV 

D,H 

36 

nn 

MVI 

M,nn 

55 

MOV 

D,L 

00 


NOP 


56 

MOV 

D,M 

B7 


ORA 

A 

5F 

MOV 

E,A 

B0 


ORA 

B 

58 

MOV 

E,B 

B1 


ORA 

C 

59 

MOV 

E,C 

B2 


ORA 

D 

5A 

MOV 

E,D 

B3 


ORA 

E 

5B 

MOV 

E,E 

B4 


ORA 

H 

5C 

MOV 

E,H 

B5 


ORA 

L 

5D 

MOV 

E,L 

B6 


ORA 

M 

5E 

MOV 

E,M 

F6 

nn 

ORI 

nn 

67 

MOV 

H,A 

D3 

nn 

OUT 

nn 

60 

MOV 

H,B 

E9 


PCHL 


61 

MOV 

H,C 

Cl 


POP 

B 

62 

MOV 

H,D 

D1 


POP 

D 

63 

MOV 

H,E 

El 


POP 

H 

64 

MOV 

H,H 

FI 


POP 

PSW 

65 

MOV 

H,L 

C5 


PUSH 

B 

66 

MOV 

H,M 

D5 


PUSH 

D 

6F 

MOV 

L,A 

E5 


PUSH 

H 

68 

MOV 

L,B 

F5 


PUSH 

PSW 

69 

MOV 

L,C 

17 


RAL 


6A 

MOV 

L,D 

IF 


RAR 


6B 

MOV 

L,E 

D8 


RC 


6C 

MOV 

L,H 

C9 


RET 


6D 

MOV 

L,L 

07 


RLC 


6E 

MOV 

L,M 

F8 


RM 


77 

MOV 

M,A 

DO 


RNC 


70 

MOV 

M,B 

CO 


RNZ 














THE 8080 INSTRUCTION SET (ALPHABETIC) 327 


Hex 

Mnemonic 

Hex 


Mnemonic 

F0 

RP 


32 

nnnn 

STA 

nnnn 

E8 

RPE 


02 


STAX 

B 

EO 

RPO 


12 


STAX 

D 

OF 

RRC 


37 


STC 


Cl 

RST 

0 

97 


SUB 

A 

CF 

RST 

1 

90 


SUB 

B 

D7 

RST 

2 

91 


SUB 

C 

DF 

RST 

3 

92 


SUB 

D 

E7 

RST 

4 

93 


SUB 

E 

EF 

RST 

5 

94 


SUB 

H 

F7 

RST 

6 

95 


SUB 

L 

FF 

RST 

7 

96 


SUB 

M 

C8 

RZ 


D6 

nn 

SUI 

nn 

9F 

SBB 

A 

EB 


XCHG 


98 

SBB 

B 

AF 


XRA 

A 

99 

SBB 

C 

A8 


XRA 

B 

9A 

SBB 

D 

A9 


XRA 

C 

9B 

SBB 

E 

AA 


XRA 

D 

9C 

SBB 

H 

AB 


XRA 

E 

9D 

SBB 

L 

AC 


XRA 

H 

9E 

SBB 

M 

AD 


XRA 

L 

DE nn 

SBI 

nn 

AE 


XRA 

M 

22 nnnn 

SHLD 

nnnn 

EE 

nn 

XRI 

nn 

F9 

SPHL 


E3 


XTHL 















APPENDIX 



The 8080 
Instruction Set 
Numeric 


The 8080 instruction set is listed numerically with the corresponding 
hexadecimal code. The following representations apply: 

nn 8-bit parameter 
nnnn 16-bit parameter 


Hex 


Mnemonic 

Hex 


Mnemonic 

00 


NOP 


16 

nn 

MVI 

D,nn 

01 

nnnn 

LXI 

B,nnnn 

17 


RAL 


02 


STAX 

B 

18 


<not used> 

03 


INX 

B 

19 


DAD 

D 

04 


INR 

B 

1A 


LDAX 

D 

05 


DCR 

B 

IB 


DCX 

D 

06 

nn 

MVI 

B,nn 

1C 


INR 

E 

07 


RLC 


ID 


DCR 

E 

08 


<not used> 

IE 

nn 

MVI 

E,nn 

09 


DAD 

B 

IF 


RAR 


0A 


LDAX 

B 

20 


<not used> 

0B 


DCX 

B 

21 

nnnn 

LXI 

H,nnnn 

OC 


INR 

C 

22 

nnnn 

SHLD 

nnnn 

0D 


DCR 

C 

23 


INX 

H 

0E 

nn 

MVI 

C,nn 

24 


INR 

H 

OF 


RRC 


25 


DCR 

H 

10 


<not used> 

26 

nn 

MVI 

H,nn 

11 

nnnn 

LXI 

D,nnnn 

27 


DAA 


12 


STAX 

D 

28 


<not used> 

13 


INX 

D 

29 


DAD 

H 

14 


INR 

D 

2A 

nnnn 

LHLD 

nnnn 

15 


DCR 

D 

2B 


DCX 

H 






























































30 

31 

32 

33 

34 

35 

36 

37 

38 

39 

3A 

3B 

3C 

3D 

3E 

3F 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

4A 

4B 

4C 

4D 

4E 

4F 

50 

51 

52 

53 

54 


THE 8080 INSTRUCTION SET (NUMERIC) 329 


Mnemonic 

Hex 

Mnemonic 


INR 

L 

55 

MOV 

D,L 


DCR 

L 

56 

MOV 

D,M 

nn 

MVI 

L,nn 

57 

MOV 

D,A 


CMA 


58 

MOV 

E,B 


<not used> 

59 

MOV 

E,C 

nnnn 

LXI 

SP,nnnn 

5A 

MOV 

E,D 

nnnn 

STA 

nnnn 

5B 

MOV 

E,E 


INX 

SP 

5C 

MOV 

E,H 


INR 

M 

5D 

MOV 

E,L 


DCR 

M 

5E 

MOV 

E,M 

nn 

MVI 

M,nn 

5F 

MOV 

E,A 


STC 


60 

MOV 

H,B 


<not used> 

61 

MOV 

H,C 


DAD 

SP 

62 

MOV 

H,D 

nnnn 

LDA 

nnnn 

63 

MOV 

H,E 


DCX 

SP 

64 

MOV 

H,H 


INR 

A 

65 

MOV 

H,L 


DCR 

A 

66 

MOV 

H,M 

nn 

MVI 

A,nn 

67 

MOV 

H,A 


CMC 


68 

MOV 

L,B 


MOV 

B,B 

69 

MOV 

L,C 


MOV 

B,C 

6A 

MOV 

L,D 


MOV 

B,D 

6B 

MOV 

L,E 


MOV 

B,E 

6C 

MOV 

L,H 


MOV 

B,H 

6D 

MOV 

L,L 


MOV 

B,L 

6E 

MOV 

L,M 


MOV 

B,M 

6F 

MOV 

L,A 


MOV 

B,A 

70 

MOV 

M,B 


MOV 

C,B 

71 

MOV 

M,C 


MOV 

C,C 

72 

MOV 

M,D 


MOV 

C,D 

73 

MOV 

M,E 


MOV 

C,E 

74 

MOV 

M,H 


MOV 

C,H 

75 

MOV 

M,L 


MOV 

C,L 

76 

HLT 



MOV 

C,M 

77 

MOV 

M,A 


MOV 

C,A 

78 

MOV 

A,B 


MOV 

D,B 

79 

MOV 

A,C 


MOV 

D,C 

7A 

MOV 

A,D 


MOV 

D,D 

7B 

MOV 

A,E 


MOV 

D,E 

7C 

MOV 

A,H 


MOV 

D,H 

7D 

MOV 

A,L 













330 MASTERING CP/M 


Hex 

Mnemonic 

Hex 


Mnemonic 

7E 

MOV 

A,M 

A7 


ANA 

A 

7F 

MOV 

A,A 

A8 


XRA 

B 

80 

ADD 

B 

A9 


XRA 

C 

81 

ADD 

C 

AA 


XRA 

D 

82 

ADD 

D 

AB 


XRA 

E 

83 

ADD 

E 

AC 


XRA 

H 

84 

ADD 

H 

AD 


XRA 

L 

85 

ADD 

L 

AE 


XRA 

M 

86 

ADD 

M 

AF 


XRA 

A 

87 

ADD 

A 

BO 


ORA 

B 

88 

ADC 

B 

B1 


ORA 

C 

89 

ADC 

C 

B2 


ORA 

D 

8A 

ADC 

D 

B3 


ORA 

E 

8B 

ADC 

E 

B4 


ORA 

H 

8C 

ADC 

H 

B5 


ORA 

L 

8D 

ADC 

L 

B6 


ORA 

M 

8E 

ADC 

M 

B7 


ORA 

A 

8F 

ADC 

A 

B8 


CMP 

B 

90 

SUB 

B 

B9 


CMP 

C 

91 

SUB 

C 

BA 


CMP 

D 

92 

SUB 

D 

BB 


CMP 

E 

93 

SUB 

E 

BC 


CMP 

H 

94 

SUB 

H 

BD 


CMP 

L 

95 

SUB 

L 

BE 


CMP 

M 

96 

SUB 

M 

BF 


CMP 

A 

97 

SUB 

A 

CO 


RNZ 


98 

SBB 

B 

Cl 


POP 

B 

99 

SBB 

C 

C2 

nnnn 

JNZ 

nnnn 

9A 

SBB 

D 

C3 

nnnn 

JMP 

nnnn 

9B 

SBB 

E 

C4 

nnnn 

CNZ 

nnnn 

9C 

SBB 

H 

C5 


PUSH 

B 

9D 

SBB 

L 

C6 

nn 

ADI 

nn 

9E 

SBB 

M 

Cl 


RST 

0 

9F 

SBB 

A 

C8 


RZ 


AO 

ANA 

B 

C9 


RET 


A1 

ANA 

C 

CA 

nnnn 

JZ 

nnnn 

A2 

ANA 

D 

CB 


<not used> 

A3 

ANA 

E 

CC 

nnnn 

CZ 

nnnn 

A4 

ANA 

H 

CD 

nnnn 

CALL 

nnnn 

A5 

ANA 

L 

CE 

nn 

ACI 

nn 

A6 

ANA 

M 

CF 


RST 

1 










THE 8080 INSTRUCTION SET (NUMERIC) 331 


Hex 


Mnemonic 

Hex 


Mnemonic 

DO 


RNC 


E8 


RPE 


D1 


POP 

D 

E9 


PCHL 


D2 

nnnn 

JNC 

nnnn 

EA 

nnnn 

JPE 

nnnn 

D3 

nn 

OUT 

nn 

EB 


XCHG 


D4 

nnnn 

CNC 

nnnn 

EC 

nnnn 

CPE 

nnnn 

D5 


PUSH 

D 

ED 


<not used> 

D6 

nn 

SUI 

nn 

EE 

nn 

XRI 

nn 

D7 


RST 

2 

EF 


RST 

5 

D8 


RC 


F0 


RP 


D9 


<not used> 

FI 


POP 

PSW 

DA 

nnnn 

JC 

nnnn 

F2 

nnnn 

JP 

nnnn 

DB 

nn 

IN 

nn 

F3 


DI 


DC 

nnnn 

CC 

nnnn 

F4 

nnnn 

CP 

nnnn 

DD 


<not used> 

F5 


PUSH 

PSW 

DE 

nn 

SBI 

nn 

F6 

nn 

ORI 

nn 

DF 


RST 

3 

F7 


RST 

6 

E0 


RPO 


F8 


RM 


El 


POP 

H 

F9 


SPHL 


E2 

nnnn 

JPO 

nnnn 

FA 

nnnn 

JM 

nnnn 

E3 


XTHL 


FB 


El 


E4 

nnnn 

CPO 

nnnn 

FC 

nnnn 

CM 

nnnn 

E5 


PUSH 

H 

FD 


<not used> 

E6 

nn 

ANI 

nn 

FE 

nn 

CPI 

nn 

E7 


RST 

4 

FF 


RST 

7 













APPENDIX 


E 


The Z80 
Instruction Set 
Alphabetic 


The Zilog Z80 instruction set is listed alphabetically with the cor¬ 
responding hexadecimal values. The following representations apply: 

nn 8-bit parameters 

nnnn 16-bit parameters 

dd 8-bit signed displacement 

* Instructions common to the 8080 


Hex 


Mnemonic 

Hex 


Mnemonic 

8E 


* ADC 

A,(HL) 

81 


* 

ADD 

A,C 

DD 

8Edd 

ADC 

A,(IX + dd) 

82 


* 

ADD 

A,D 

FD 

8Edd 

ADC 

A,(IY + dd) 

83 


* 

ADD 

A,E 

8F 


* ADC 

A,A 

84 


* 

ADD 

A,H 

88 


* ADC 

A,B 

85 


* 

ADD 

A,L 

89 


* ADC 

A,C 

C6 

nn 

* 

ADD 

A,nn 

8A 


* ADC 

A,D 

09 


* 

ADD 

HL,BC 

8B 


* ADC 

A,E 

19 


* 

ADD 

HL,DE 

8C 


* ADC 

A,H 

29 


* 

ADD 

HL,HL 

8D 


* ADC 

A,L 

39 


* 

ADD 

HL,SP 

CE 

nn 

* ADC 

A,nn 

DD 

09 


ADD 

IX,BC 

ED 

4A 

ADC 

HL,BC 

DD 

19 


ADD 

IX,DE 

ED 

5A 

ADC 

HL,DE 

DD 

29 


ADD 

IX,IX 

ED 

6A 

ADC 

HL,HL 

DD 

39 


ADD 

IX, SP 

ED 

7A 

ADC 

HL,SP 

FD 

09 


ADD 

IY,BC 

86 


* ADD 

A,(HL) 

FD 

19 


ADD 

IY,DE 

DD 

86dd 

ADD 

A,(IX + dd) 

FD 

29 


ADD 

IY,IY 

FD 

86dd 

ADD 

A,(IY + dd) 

FD 

39 


ADD 

IY,SP 

87 


* ADD 

A,A 

A6 


* 

AND 

(HL) 

80 


* ADD 

A,B 

DD 

A6dd 


AND 

(IX+dd) 
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Hex 

Mnemonic 

FD 

A6dd 

AND 

(IY+dd) 

A7 


* AND 

A 

AO 


* AND 

B 

A1 


* AND 

C 

A2 


* AND 

D 

A3 


* AND 

E 

A4 


* AND 

H 

A5 


* AND 

L 

E6 

nn 

* AND 

nn 

CB 

46 

BIT 

0,(HL) 

DD 

CBdd46 

BIT 

0,(IX+dd) 

FD 

CBdd46 

BIT 

0,(IY+dd) 

CB 

47 

BIT 

0,A 

CB 

40 

BIT 

0,B 

CB 

41 

BIT 

0,C 

CB 

42 

BIT 

0,D 

CB 

43 

BIT 

0,E 

CB 

44 

BIT 

0,H 

CB 

45 

BIT 

0,L 

CB 

4E 

BIT 

1,(HL) 

DD 

CBdd4E 

BIT 

l,(IX+dd) 

FD 

CBdd4E 

BIT 

1,(IY+dd) 

CB 

4F 

BIT 

1,A 

CB 

48 

BIT 

l.B 

CB 

49 

BIT 

i,c 

CB 

4A 

BIT 

1,D 

CB 

4B 

BIT 

1,E 

CB 

4C 

BIT 

1,H 

CB 

4D 

BIT 

1,L 

CB 

56 

BIT 

2,(HL) 

DD 

CBdd56 

BIT 

2,(IX + dd) 

FD 

CBdd56 

BIT 

2,(IY+dd) 

CB 

57 

BIT 

2,A 

CB 

50 

BIT 

2,B 

CB 

51 

BIT 

2,C 

CB 

52 

BIT 

2,D 

CB 

53 

BIT 

2,E 

CB 

54 

BIT 

2,H 

CB 

55 

BIT 

2,L 

CB 

5E 

BIT 

3,(HL) 

DD 

CBdd5E 

BIT 

3,(IX+dd) 

FD 

CBdd5E 

BIT 

3,(IY+dd) 


Hex Mnemonic 


CB 

5F 

BIT 

3,A 

CB 

58 

BIT 

3,B 

CB 

59 

BIT 

3,C 

CB 

5A 

BIT 

3,D 

CB 

5B 

BIT 

3,E 

CB 

5C 

BIT 

3,H 

CB 

5D 

BIT 

3,L 

CB 

66 

BIT 

4,(HL) 

DD 

CBdd66 

BIT 

4,(IX + dd) 

FD 

CBdd66 

BIT 

4,(IY+dd) 

CB 

67 

BIT 

4,A 

CB 

60 

BIT 

4,B 

CB 

61 

BIT 

4,C 

CB 

62 

BIT 

4,D 

CB 

63 

BIT 

4,E 

CB 

64 

BIT 

4,H 

CB 

65 

BIT 

4,L 

CB 

6E 

BIT 

5,(HL) 

DD 

CBdd6E 

BIT 

5,(IX + dd) 

FD 

CBdd6E 

BIT 

5,(IY+dd) 

CB 

6F 

BIT 

5,A 

CB 

68 

BIT 

5,B 

CB 

69 

BIT 

5,C 

CB 

6A 

BIT 

5,D 

CB 

6B 

BIT 

5,E 

CB 

6C 

BIT 

5,H 

CB 

6D 

BIT 

5,L 

CB 

76 

BIT 

6,(HL) 

DD 

CBdd76 

BIT 

6,(IX+dd) 

FD 

CBdd76 

BIT 

6,(IY+dd) 

CB 

77 

BIT 

6,A 

CB 

70 

BIT 

6,B 

CB 

71 

BIT 

6,C 

CB 

72 

BIT 

6,D 

CB 

73 

BIT 

6,E 

CB 

74 

BIT 

6,H 

CB 

75 

BIT 

6,L 

CB 

7E 

BIT 

7,(HL) 

DD 

CBdd7E 

BIT 

7,(IX + dd) 

FD 

CBdd7E 

BIT 

7,(IY+dd) 

CB 

7F 

BIT 

7,A 

CB 

78 

BIT 

7,B 

















334 MASTERING CP/M 


Hex 


Mnemonic 

Hex 


Mnemonic 

CB 

79 

BIT 

7,C 

25 


* DEC 

H 

CB 

7A 

BIT 

7,D 

2B 


* DEC 

HL 

CB 

7B 

BIT 

7.E 

DD 

2B 

DEC 

IX 

CB 

7C 

BIT 

7,H 

FD 

2B 

DEC 

IY 

CB 

7D 

BIT 

7,L 

2D 


* DEC 

L 

DC 

nnnn 

* CALL 

C,nnnn 

3B 


* DEC 

SP 

FC 

nnnn 

* CALL 

M,nnnn 

F3 


* DI 


D4 

nnnn 

* CALL 

NC,nnnn 

10 

dd 

DJNZ 

dd 

CD 

nnnn 

* CALL 

nnnn 

FB 


* El 


C4 

nnnn 

* CALL 

NZ,nnnn 

E3 


* EX 

(SP),HL 

F4 

nnnn 

* CALL 

P,nnnn 

DD 

E3 

EX 

(SP),IX 

EC 

nnnn 

* CALL 

PE, nnnn 

FD 

E3 

EX 

(SP),IY 

E4 

nnnn 

* CALL 

PO,nnnn 

08 


EX 

AF,AF 

CC 

nnnn 

* CALL 

Z,nnnn 

EB 


* EX 

DE,HL 

3F 


* CCF 


D9 


EXX 


BE 


* CP 

(HL) 

76 


* HALT 


DD 

BEdd 

CP 

(IX+dd) 

ED 

46 

IM 

0 

FD 

BEdd 

CP 

(IY + dd) 

ED 

56 

IM 

1 

BF 


* CP 

A 

ED 

5E 

IM 

2 

B8 


* CP 

B 

ED 

78 

IN 

A,(C) 

B9 


* CP 

C 

DB 

nn 

* IN 

A,(nn) 

BA 


* CP 

D 

ED 

40 

IN 

B,(C) 

BB 


* CP 

E 

ED 

48 

IN 

C,(Q 

BC 


* CP 

H 

ED 

50 

IN 

D,(C) 

BD 


* CP 

L 

ED 

58 

IN 

E,(Q 

FE 

nn 

* CP 

nn 

ED 

60 

IN 

H,(C) 

ED 

A9 

CPD 


ED 

68 

IN 

L,(C) 

ED 

B9 

CPDR 


34 


* INC 

(HL) 

ED 

A1 

CPI 


DD 

34dd 

INC 

(IX + dd) 

ED 

B1 

CPIR 


FD 

34dd 

INC 

(IY + dd) 

2F 


* CPL 


3C 


* INC 

A 

27 


* DAA 


04 


* INC 

B 

35 


* DEC 

(HL) 

03 


* INC 

BC 

DD 

35dd 

DEC 

(IX + dd) 

OC 


* INC 

C 

FD 

35dd 

DEC 

(IY + dd) 

14 


* INC 

D 

3D 


* DEC 

A 

13 


* INC 

DE 

05 


* DEC 

B 

1C 


* INC 

E 

OB 


* DEC 

BC 

24 


* INC 

H 

OD 


* DEC 

C 

23 


* INC 

HL 

15 


* DEC 

D 

DD 

23 

INC 

IX 

IB 


* DEC 

DE 

FD 

23 

INC 

IY 

ID 


* DEC 

E 

2C 


* INC 

L 
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Hex 


Mnemonic 

Hex 


Mnemonic 

33 


* INC 

SP 

FD 

71dd 

LD 

(IY + dd),C 

ED 

AA 

IND 


FD 

72dd 

LD 

(IY+dd),D 

ED 

BA 

INDR 


FD 

73dd 

LD 

(IY+dd),E 

ED 

A2 

INI 


FD 

74dd 

LD 

(IY+dd),H 

ED 

B2 

INIR 


FD 

75dd 

LD 

(IY + dd),L 

E9 


* JP 

(HL) 

FD 

36ddnn 

LD 

(IY+dd),nn 

DD 

E9 

JP 

(IX) 

32 

nnnn 

* LD 

(nnnn), A 

FD 

E9 

JP 

(IY) 

ED 

43nnnn 

LD 

(nnnn),BC 

DA 

nnnn 

* JP 

C,nnnn 

ED 

53nnnn 

LD 

(nnnn),DE 

FA 

nnnn 

* JP 

M,nnnn 

22 

nnnn 

* LD 

(nnnn),HL 

D2 

nnnn 

* JP 

NC,nnnn 

DD 

22nnnn 

LD 

(nnnn), IX 

C3 

nnnn 

* JP 

nnnn 

FD 

22nnnn 

LD 

(nnnn), IY 

C2 

nnnn 

* JP 

NZ,nnnn 

ED 

73nnnn 

LD 

(nnnn),SP 

F2 

nnnn 

* JP 

P,nnnn 

0A 


* LD 

A,(BC) 

EA 

nnnn 

* JP 

PE, nnnn 

1A 


* LD 

A,(DE) 

E2 

nnnn 

* JP 

PO,nnnn 

7E 


* LD 

A,(HL) 

CA 

nnnn 

* JP 

Z,nnnn 

DD 

7Edd 

LD 

A,(IX+dd) 

38 

dd 

JR 

C,dd 

FD 

7Edd 

LD 

A,(IY+dd) 

18 

dd 

JR 

dd 

3A 

nnnn 

* LD 

A, (nnnn) 

30 

dd 

JR 

NC,dd 

7F 


* LD 

A,A 

20 

dd 

JR 

NZ,dd 

78 


* LD 

A,B 

28 

dd 

JR 

Z,dd 

79 


* LD 

A,C 

02 


* LD 

(BC),A 

7A 


* LD 

A,D 

12 


* LD 

(DE),A 

7B 


* LD 

A,E 

77 


* LD 

(HL),A 

7C 


* LD 

A,H 

70 


* LD 

(HL),B 

ED 

57 

LD 

A, I 

71 


* LD 

(HL),C 

7D 


* LD 

A,L 

72 


* LD 

(HL),D 

3E 

nn 

* LD 

A,nn 

73 


* LD 

(HL),E 

ED 

5F 

LD 

A,R 

74 


* LD 

(HL),H 

46 


* LD 

B,(HL) 

75 


* LD 

(HL),L 

DD 

46dd 

LD 

B,(IX+dd) 

36 

nn 

* LD 

(HL),nn 

FD 

46dd 

LD 

B,(IY+dd) 

DD 

77dd 

LD 

(IX + dd),A 

47 


* LD 

B,A 

DD 

70dd 

LD 

(IX+dd),B 

40 


* LD 

B,B 

DD 

71dd 

LD 

(IX+dd),C 

41 


* LD 

B,C 

DD 

72dd 

LD 

(IX+dd),D 

42 


* LD 

B,D 

DD 

73dd 

LD 

(IX + dd),E 

43 


* LD 

B,E 

DD 

74dd 

LD 

(IX+dd),H 

44 


* LD 

B,H 

DD 

75dd 

LD 

(IX*Fdd),L 

45 


* LD 

B,L 

DD 

36ddnn 

LD 

(IX+dd),nn 

06 

nn 

* LD 

B,nn 

FD 

77dd 

LD 

(IY+dd),A 

ED 

4Bnnnn 

LD 

BC,(nnnn) 

FD 

70dd 

LD 

(IY + dd),B 

01 

nnnn 

* LD 

BC,nnnn 
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Hex 


Mnemonic 

Hex 


Mnemonic 

4E 

' 

* LD 

C,(HL) 

63 


* LD 

H,E 

DD 

4Edd 

LD 

C,(IX + dd) 

64 


* LD 

H,H 

FD 

4Edd 

LD 

C,(IY + dd) 

65 


* LD 

H,L 

4F 


* LD 

C,A 

26 

nn 

* LD 

H,nn 

48 


* LD 

C,B 

2A 

nnnn 

* LD 

HL,(nnnn) 

49 


* LD 

C,C 

21 

nnnn 

* LD 

HL,nnnn 

4A 


* LD 

C,D 

ED 

47 

LD 

I,A 

4B 


* LD 

C,E 

DD 

2Annnn 

LD 

DC, (nnnn) 

4C 


* LD 

C,H 

DD 

21nnnn 

LD 

IX,nnnn 

4D 


* LD 

C,L 

FD 

2Annnn 

LD 

IY,(nnnn) 

OE 

nn 

* LD 

C,nn 

FD 

21nnnn 

LD 

IY, nnnn 

56 


* LD 

D,(HL) 

6E 


* LD 

L,(HL) 

DD 

56dd 

LD 

D,(IX+dd) 

DD 

6Edd 

LD 

L,(IX + dd) 

FD 

56dd 

LD 

D,(IY+dd) 

FD 

6Edd 

LD 

L,(IY-Fdd) 

57 


* LD 

D,A 

6F 


* LD 

L,A 

50 


* LD 

D,B 

68 


* LD 

L,B 

51 


* LD 

D,C 

69 


* LD 

L,C 

52 


* LD 

D,D 

6A 


* LD 

L,D 

53 


* LD 

D,E 

6B 


* LD 

L,E 

54 


♦ LD 

D,H 

6C 


* LD 

L,H 

55 


* LD 

D,L 

6D 


* LD 

L,L 

16 

nn 

* LD 

D,nn 

2E 

nn 

* LD 

L,nn 

ED 

5Bnnnn 

LD 

DE,(nnnn) 

ED 

4F 

LD 

R,A 

11 

nnnn 

* LD 

DE,nnnn 

ED 

7Bnnnn 

LD 

SP,(nnnn) 

5E 


* LD 

E,(HL) 

F9 


* LD 

SP,HL 

DD 

5Edd 

LD 

E,(IX+dd) 

DD 

F9 

LD 

SP,IX 

FD 

5Edd 

LD 

E,(IY + dd) 

FD 

F9 

LD 

SP,IY 

5F 


* LD 

E,A 

31 

nnnn 

* LD 

SP,nnnn 

58 


* LD 

E,B 

ED 

A8 

LDD 


59 


* LD 

E,C 

ED 

B8 

LDDR 


5A 


* LD 

E,D 

ED 

AO 

LDI 


5B 


* LD 

E,E 

ED 

BO 

LDIR 


5C 


* LD 

E,H 

ED 

44 

NEG 


5D 


* LD 

E,L 

00 


* NOP 


IE 

nn 

* LD 

E,nn 

B6 


* OR 

(HL) 

66 


* LD 

H,(HL) 

DD 

B6dd 

OR 

(IX + dd) 

DD 

66dd 

LD 

H,(IX + dd) 

FD 

B6dd 

OR 

(IY + dd) 

FD 

66dd 

LD 

H,(IY + dd) 

B7 


* OR 

A 

67 


* LD 

H,A 

BO 


* OR 

B 

60 


* LD 

H,B 

B1 


* OR 

C 

61 


* LD 

H,C 

B2 


* OR 

D 

62 


* LD 

H,D 

B3 


* OR 

E 
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Hex 


B4 


B5 


F6 

nn 

ED 

BB 

ED 

B3 

ED 

79 

ED 

41 

ED 

49 

ED 

51 

ED 

59 

ED 

61 

ED 

69 

D3 

nn 

ED 

AB 

ED 

A3 

FI 


Cl 


D1 


El 


DD 

El 

FD 

El 

F5 


C5 


D5 


E5 


DD 

E5 

FD 

E5 

CB 

86 

DD 

CBdd86 

FD 

CBdd86 

CB 

87 

CB 

80 

CB 

81 

CB 

82 

CB 

83 

CB 

84 

CB 

85 

CB 

8E 

DD 

CBdd8E 

FD 

CBdd8E 

CB 

8F 

CB 

88 


Mnemonic 

Hex 

Mnemonic 

* OR 

H 

CB 

89 

RES 

l,c 

* OR 

L 

CB 

8A 

RES 

1,D 

* OR 

nn 

CB 

8B 

RES 

1,E 

OTDR 

CB 

8C 

RES 

1»H 

OTIR 


CB 

8D 

RES 

l.L 

OUT 

(Q.A 

CB 

96 

RES 

2,(HL) 

OUT 

(C),B 

DD 

CBdd96 

RES 

2,(IX+dd) 

OUT 

(C),C 

FD 

CBdd96 

RES 

2,(IY+dd) 

OUT 

(Q,D 

CB 

97 

RES 

2,A 

OUT 

(Q,E 

CB 

90 

RES 

2,B 

OUT 

(Q,H 

CB 

91 

RES 

2,C 

OUT 

(C),L 

CB 

92 

RES 

2,D 

* OUT 

(nn),A 

CB 

93 

RES 

2,E 

OUTD 


CB 

94 

RES 

2,H 

OUTI 


CB 

95 

RES 

2,L 

* POP 

AF 

CB 

9E 

RES 

3,(HL) 

* POP 

BC 

DD 

CBdd9E 

RES 

3,(IX+dd) 

* POP 

DE 

FD 

CBdd9E 

RES 

3,(IY+dd) 

* POP 

HL 

CB 

9F 

RES 

3,A 

POP 

IX 

CB 

98 

RES 

3,B 

POP 

IY 

CB 

99 

RES 

3,C 

* PUSH 

AF 

CB 

9A 

RES 

3,D 

* PUSH 

BC 

CB 

9B 

RES 

3,E 

* PUSH 

DE 

CB 

9C 

RES 

3,H 

* PUSH 

HL 

CB 

9D 

RES 

3,L 

PUSH 

IX 

CB 

A6 

RES 

4,(HL) 

PUSH 

IY 

DD 

CBddA6 

RES 

4,(IX+dd) 

RES 

0,(HL) 

FD 

CBddA6 

RES 

4,(IY+dd) 

RES 

0,(IX + dd) 

CB 

A7 

RES 

4,A 

RES 

0,(IY 4- dd) 

CB 

AO 

RES 

4,B 

RES 

0,A 

CB 

A1 

RES 

4,C 

RES 

0,B 

CB 

A2 

RES 

4,D 

RES 

0,C 

CB 

A3 

RES 

4,E 

RES 

0,D 

CB 

A4 

RES 

4,H 

RES 

0,E 

CB 

A5 

RES 

4,L 

RES 

0,H 

CB 

AE 

RES 

5,(HL) 

RES 

0,L 

DD 

CBddAE 

RES 

5,(IX+dd) 

RES 

1,(HL) 

FD 

CBddAE 

RES 

5,(IY+dd) 

RES 

l,(IX + dd) 

CB 

AF 

RES 

5,A 

RES 

l,(IY+dd) 

CB 

A8 

RES 

5,B 

RES 

1,A 

CB 

A9 

RES 

5,C 

RES 

1»B 

CB 

AA 

RES 

5,D 


1 
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Hex Mnemonic 


CB 

AB 

RES 

5,E 

CB 

AC 

RES 

5,H 

CB 

AD 

RES 

5,L 

CB 

B6 

RES 

6,(HL) 

DD 

CBddB6 

RES 

6,(IX+dd) 

FD 

CBddB6 

RES 

6,(IY+dd) 

CB 

B7 

RES 

6,A. 

CB 

BO 

RES 

6,B 

CB 

B1 

RES 

6,C 

CB 

B2 

RES 

6,D 

CB 

B3 

RES 

6,E 

CB 

B4 

RES 

6,H 

CB 

B5 

RES 

6,L 

CB 

BE 

RES 

7,(HL) 

DD 

CBddBE 

RES 

7,(IX+dd) 

FD 

CBddBE 

RES 

7,(IY + dd) 

CB 

BF 

RES 

7,A 

CB 

B8 

RES 

7,B 

CB 

B9 

RES 

7,C 

CB 

BA 

RES 

7,D 

CB 

BB 

RES 

7,E 

CB 

BC 

RES 

7,H 

CB 

BD 

RES 

7,L 

C9 


* RET 


D8 


* RET 

C 

F8 


* RET 

M 

DO 


* RET 

NC 

CO 


* RET 

NZ 

FO 


* RET 

P 

E8 


* RET 

PE 

EO 


* RET 

PO 

C8 


* RET 

Z 

ED 

4D 

RETI 


ED 

45 

RETN 


CB 

16 

RL 

(HL) 

DD 

CBddl6 

RL 

(IX+dd) 

FD 

CBddl6 

RL 

(IY+dd) 

CB 

17 

RL 

A 

CB 

10 

RL 

B 

CB 

11 

RL 

C 

CB 

12 

RL 

D 

CB 

13 

RL 

E 


Hex Mnemonic 


CB 

14 

RL 

H 

CB 

15 

RL 

L 

17 


* RLA 


CB 

06 

RLC 

(HL) 

DD 

CBdd06 

RLC 

(IX+dd) 

FD 

CBdd06 

RLC 

(IY+dd) 

CB 

07 

RLC 

A 

CB 

00 

RLC 

B 

CB 

01 

RLC 

C 

CB 

02 

RLC 

D 

CB 

03 

RLC 

E 

CB 

04 

RLC 

H 

CB 

05 

RLC 

L 

07 


* RLCA 


ED 

6F 

RLD 


CB 

IE 

RR 

(HL) 

DD 

CBddlE 

RR 

(IX+dd) 

FD 

CBddlE 

RR 

(IY+dd) 

CB 

IF 

RR 

A 

CB 

18 

RR 

B 

CB 

19 

RR 

C 

CB 

1A 

RR 

D 

CB 

IB 

RR 

E 

CB 

1C 

RR 

H 

CB 

ID 

RR 

L 

IF 


* RRA 


CB 

OE 

RRC 

(HL) 

DD 

CBddOE 

RRC 

(IX+dd) 

FD 

CBddOE 

RRC 

(IY+dd) 

CB 

OF 

RRC 

A 

CB 

08 

RRC 

B 

CB 

09 

RRC 

C 

CB 

OA 

RRC 

D 

CB 

OB 

RRC 

E 

CB 

OC 

RRC 

H 

CB 

OD 

RRC 

L 

OF 


* RRCA 

ED 

67 

RRD 


C7 


* RST 

0 

CF 


* RST 

8 

D7 


* RST 

10H 

DF 


* RST 

18H 
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Hex 

Mnemonic 

Hex 

E7 


* RST 

20H 

FD 

CBddD6 

EF 


* RST 

28H 

CB 

D7 

F7 


* RST 

30H 

CB 

DO 

FF 


* RST 

38H 

CB 

D1 

9E 


* SBC 

A,(HL) 

CB 

D2 

DD 

9Edd 

SBC 

A,(DC + dd) 

CB 

D3 

FD 

9Edd 

SBC 

A,(IY + dd) 

CB 

D4 

9F 


* SBC 

A,A 

CB 

D5 

98 


* SBC 

A,B 

CB 

DE 

99 


* SBC 

A,C 

DD 

CBddDE 

9A 


* SBC 

A,D 

FD 

CBddDE 

9B 


* SBC 

A,E 

CB 

DF 

9C 


* SBC 

A,H 

CB 

D8 

9D 


* SBC 

A,L 

CB 

D9 

DE 

nn 

* SBC 

A,nn 

CB 

DA 

ED 

42 

SBC 

HL,BC 

CB 

DB 

ED 

52 

SBC 

HL,DE 

CB 

DC 

ED 

62 

SBC 

HL,HL 

CB 

DD 

ED 

72 

SBC 

HL,SP 

CB 

E6 

37 


* SCF 


DD 

CBddE6 

CB 

C6 

SET 

0,(HL) 

FD 

CBddE6 

DD 

CBddC6 

SET 

0,(IX + dd) 

CB 

E7 

FD 

CBddC6 

SET 

0,(IY+dd) 

CB 

EO 

CB 

Cl 

SET 

0,A 

CB 

El 

CB 

CO 

SET 

0,B 

CB 

E2 

CB 

Cl 

SET 

0,C 

CB 

E3 

CB 

C2 

SET 

0,D 

CB 

E4 

CB 

C3 

SET 

0,E 

CB 

E5 

CB 

C4 

SET 

0,H 

CB 

EE 

CB 

C5 

SET 

0,L 

DD 

CBddEE 

CB 

CE 

SET 

1,(HL) 

FD 

CBddEE 

DD 

CBddCE 

SET 

l,(IX+dd) 

CB 

EF 

FD 

CBddCE 

SET 

l,(IY + dd) 

CB 

E8 

CB 

CF 

SET 

1,A 

CB 

E9 

CB 

C8 

SET 

1,B 

CB 

EA 

CB 

C9 

SET 

i,c 

CB 

EB 

CB 

CA 

SET 

1,D 

CB 

EC 

CB 

CB 

SET 

1,E 

CB 

ED 

CB 

CC 

SET 

1»H 

CB 

F6 

CB 

CD 

SET 

1,L 

DD 

CBddF6 

CB 

D6 

SET 

2,(HL) 

FD 

CBddF6 

DD 

CBddD6 

SET 

2,(IX+dd) 

CB 

F7 


Mnemonic 


SET 

2,(IY+dd) 

SET 

2,A 

SET 

2,B 

SET 

2,C 

SET 

2,D 

SET 

2,E 

SET 

2,H 

SET 

2,L 

SET 

3,(HL) 

SET 

3,(IX+dd) 

SET 

3,(IY+dd) 

SET 

3,A 

SET 

3,B 

SET 

3,C 

SET 

3,D 

SET 

3,E 

SET 

3,H 

SET 

3,L 

SET 

4,(HL) 

SET 

4,(IX+dd) 

SET 

4,(IY+dd) 

SET 

4,A 

SET 

4,B 

SET 

4,C 

SET 

4,D 

SET 

4,E 

SET 

4,H 

SET 

4,L 

SET 

5,(HL) 

SET 

5,(IX+dd) 

SET 

5,(IY+dd) 

SET 

5,A 

SET 

5,B 

SET 

5,C 

SET 

5,D 

SET 

5,E 

SET 

5,H 

SET 

5,L 

SET 

6,(HL) 

SET 

6,(IX+dd) 

SET 

6,(IY+dd) 

SET 

6,A 
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Hex Mnemonic 


CB 

F0 

SET 

6,B 

CB 

FI 

SET 

6,C 

CB 

F2 

SET 

6,D 

CB 

F3 

SET 

6,E 

CB 

F4 

SET 

6,H 

CB 

F5 

SET 

6,L 

CB 

FE 

SET 

7,(HL) 

DD 

CBddFE 

SET 

7,(IX + dd) 

FD 

CBddFE 

SET 

7,(IY + dd) 

CB 

FF 

SET 

7,A 

CB 

F8 

SET 

7,B 

CB 

F9 

SET 

7,C 

CB 

FA 

SET 

7,D 

CB 

FB 

SET 

7,E 

CB 

FC 

SET 

7,H 

CB 

FD 

SET 

7,L 

CB 

26 

SLA 

(HL) 

DD 

CBdd26 

SLA 

(IX+dd) 

FD 

CBdd26 

SLA 

(IY+dd) 

CB 

27 

SLA 

A 

CB 

20 

SLA 

B 

CB 

21 

SLA 

C 

CB 

22 

SLA 

D 

CB 

23 

SLA 

E 

CB 

24 

SLA 

H 

CB 

25 

SLA 

L 

CB 

2E 

SRA 

(HL) 

DD 

CBdd2E 

SRA 

(IX+dd) 

FD 

CBdd2E 

SRA 

(IY + dd) 

CB 

2F 

SRA 

A 

CB 

28 

SRA 

B 

CB 

29 

SRA 

C 

CB 

2A 

SRA 

D 

CB 

2B 

SRA 

E 


Hex 


Mnemonic 

CB 

2C 

SRA 

H 

CB 

2D 

SRA 

L 

CB 

3E 

SRL 

(HL) 

DD 

CBdd3E 

SRL 

(IX+dd) 

FD 

CBdd3E 

SRL 

(IY+dd) 

CB 

3F 

SRL 

A 

CB 

38 

SRL 

B 

CB 

39 

SRL 

C 

CB 

3A 

SRL 

D 

CB 

3B 

SRL 

E 

CB 

3C 

SRL 

H 

CB 

3D 

SRL 

L 

96 


* SUB 

(HL) 

DD 

96dd 

SUB 

(IX+dd) 

FD 

96dd 

SUB 

(IY+dd) 

97 


* SUB 

A 

90 


* SUB 

B 

91 


* SUB 

C 

92 


* SUB 

D 

93 


* SUB 

E 

94 


* SUB 

H 

95 


* SUB 

L 

D6 

nn 

* SUB 

nn 

AE 


* XOR 

(HL) 

DD 

AEdd 

XOR 

(IX+dd) 

FD 

AEdd 

XOR 

(IY + dd) 

AF 


* XOR 

A 

A8 


* XOR 

B 

A9 


* XOR 

C 

AA 


* XOR 

D 

AB 


* XOR 

E 

AC 


* XOR 

H 

AD 


* XOR 

L 

E 

nn 

* XOR 

nn 










APPENDIX 


F 


The Z80 
Instruction Set 
Numeric 


The Z80 instruction set is listed numerically with the corresponding 
hexadecimal values. The following representations apply: 

nn 8-bit parameter 

nnnn 16-bit parameter 

dd 8-bit signed displacement 

* Instructions common to the 8080 


Hex 


Mnemonic 

00 


♦ NOP 


01 

nnnn 

* LD 

BC,nnnn 

02 


* LD 

(BC),A 

03 


* INC 

BC 

04 


* INC 

B 

05 


♦ DEC 

B 

06 

nn 

* LD 

B,nn 

07 


* RLCA 


08 


EX 

AF,AF 

09 


* ADD 

HL,BC 

0A 


* LD 

A,(BC) 

0B 


* DEC 

BC 

OC 


♦ INC 

C 

0D 


♦ DEC 

C 

0E 

nn 

* LD 

C,nn 

OF 


* RRCA 


10 

dd 

DJNZ 

dd 

11 

nnnn 

* LD 

DE,nnnn 

12 


* LD 

(DE),A 


Hex Mnemonic 


13 


* INC 

DE 

14 


* INC 

D 

15 


* DEC 

D 

16 

nn 

* LD 

D,nn 

17 


* RLA 


18 

dd 

JR 

dd 

19 


* ADD 

HL,DE 

1A 


* LD 

A,(DE) 

IB 


* DEC 

DE 

1C 


* INC 

E 

ID 


* DEC 

E 

IE 

nn 

* LD 

E,nn 

IF 


* RRA 


20 

dd 

JR 

NZ,dd 

21 

nnnn 

* LD 

HL,nnnn 

22 

nnnn 

* LD 

(nnnn),HL 

23 


* INC 

HL 

24 


* INC 

H 

25 


* DEC 

H 
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Hex 


Mnemonic 


26 

nn 

* LD 

H,nn 

27 


* DAA 


28 

dd 

JR 

Z,dd 

29 


* ADD 

HL,HL 

2A 

nnnn 

* LD 

HL,(nnnn) 

2B 


* DEC 

HL 

2C 


* INC 

L 

2D 


* DEC 

L 

2E 

nn 

* LD 

L,nn 

2F 


* CPL 


30 

dd 

JR 

NC,dd 

31 

nnnn 

* LD 

SP,nnnn 

32 

nnnn 

* LD 

(nnnn),A 

33 


* INC 

SP 

34 


* INC 

(HL) 

35 


* DEC 

(HL) 

36 

nn 

* LD 

(HL),nn 

37 


* SCF 


38 

dd 

JR 

C,dd 

39 


* ADD 

HL,SP 

3A 

nnnn 

* LD 

A,(nnnn) 

3B 


* DEC 

SP 

3C 


* INC 

A 

3D 


* DEC 

A 

3E 

nn 

* LD 

A,nn 

3F 


* CCF 


40 


* LD 

B,B 

41 


* LD 

B,C 

42 


* LD 

B,D 

43 


* LD 

B,E 

44 


* LD 

B,H 

45 


* LD 

B,L 

46 


* LD 

B,(HL) 

47 


* LD 

B,A 

48 


* LD 

C,B 

49 


* LD 

C,C 

4A 


* LD 

C,D 

4B 


* LD 

C,E 

4C 


* LD 

C,H 

4D 


* LD 

C,L 

4E 


* LD 

C,(HL) 

4F 


* LD 

C,A 


Hex Mnemonic 


50 

* LD 

D,B 

51 

* LD 

D,C 

52 

* LD 

D,D 

53 

* LD 

D,E 

54 

* LD 

D,H 

55 

* LD 

D,L 

56 

* LD 

D,(HL) 

57 

* LD 

D,A 

58 

* LD 

E,B 

59 

* LD 

E,C 

5A 

* LD 

E,D 

5B 

* LD 

E,E 

5C 

* LD 

E,H 

5D 

* LD 

E,L 

5E 

* LD 

E,(HL) 

5F 

* LD 

E,A 

60 

* LD 

H,B 

61 

* LD 

H,C 

62 

* LD 

H,D 

63 

* LD 

H,E 

64 

* LD 

H,H 

65 

* LD 

H,L 

66 

* LD 

H,(HL) 

67 

* LD 

H,A 

68 

* LD 

L,B 

69 

* LD 

L,C 

6A 

* LD 

L,D 

6B 

* LD 

L,E 

6C 

* LD 

L,H 

6D 

* LD 

L,L 

6E 

* LD 

L,(HL) 

6F 

* LD 

L,A 

70 

* LD 

(HL),B 

71 

* LD 

(HL),C 

72 

* LD 

(HL),D 

73 

* LD 

(HL),E 

74 

* LD 

(HL),H 

75 

* LD 

(HL),L 

76 

* HALT 

77 

* LD 

(HL),A 

78 

* LD 

A,B 

79 

* LD 

A,C 













THE Z80 INSTRUCTION SET (NUMERIC) 343 


Hex 

Mnemonic 

Hex 

7A 

* LD A,D 

A4 

7B 

* LD A,E 

A5 

1C 

* LD A,H 

A6 

ID 

* LD A,L 

A7 

IE 

* LD A,(HL) 

A8 

IF 

* LD A, A 

A9 

80 

* ADD A,B 

AA 

81 

* ADD A,C 

AB 

82 

* ADD A,D 

AC 

83 

* ADD A,E 

AD 

84 

* ADD A,H 

AE 

85 

* ADD A,L 

AF 

86 

* ADD A,(HL) 

BO 

87 

* ADD A, A 

B1 

88 

* ADC A,B 

B2 

89 

* ADC A,C 

B3 

8A 

* ADC A,D 

B4 

8B 

* ADC A,E 

B5 

8C 

* ADC A,H 

B6 

8D 

* ADC A,L 

B7 

8E 

* ADC A,(HL) 

B8 

8F 

* ADC A,A 

B9 

90 

* SUB B 

BA 

91 

* SUB C 

BB 

92 

* SUB D 

BC 

93 

* SUB E 

BD 

94 

* SUB H 

BE 

95 

* SUB L 

BF 

96 

* SUB (HL) 

CO 

97 

* SUB A 

Cl 

98 

* SBC A,B 

C2 nnnn 

99 

* SBC A,C 

C3 nnnn 

9A 

* SBC A,D 

C4 nnnn 

9B 

* SBC A,E 

C5 

9C 

* SBC A,H 

C6 nn 

9D 

* SBC A,L 

Cl 

9E 

* SBC A,(HL) 

C8 

9F 

* SBC A,A 

C9 

AO 

* AND B 

CA nnnn 

A1 

* AND C 

CB 00 

A2 

* AND D 

CB 01 

A3 

* AND E 

CB 02 


Mnemonic 


* AND 

H 

* AND 

L 

* AND 

(HL) 

* AND 

A 

* XOR 

B 

* XOR 

C 

* XOR 

D 

* XOR 

E 

* XOR 

H 

* XOR 

L 

* XOR 

(HL) 

* XOR 

A 

* OR 

B 

* OR 

C 

* OR 

D 

* OR 

E 

* OR 

H 

* OR 

L 

* OR 

(HL) 

* OR 

A 

* CP 

B 

* CP 

C 

* CP 

D 

* CP 

E 

* CP 

H 

* CP 

L 

* CP 

(HL) 

* CP 

A 

* RET 

NZ 

* POP 

BC 

* JP 

NZ,nnnn 

* JP 

nnnn 

* CALL 

NZ,nnnn 

* PUSH 

BC 

* ADD 

A,nn 

* RST 

0 

* RET 

Z 

* RET 

* JP 

Z,nnnn 

RLC 

B 

RLC 

C 

RLC 

D 
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Hex 


Mnemonic 

CB 

03 

RLC 

E 

CB 

04 

RLC 

H 

CB 

05 

RLC 

L 

CB 

06 

RLC 

(HL) 

CB 

07 

RLC 

A 

CB 

08 

RRC 

B 

CB 

09 

RRC 

C 

CB 

OA 

RRC 

D 

CB 

OB 

RRC 

E 

CB 

OC 

RRC 

H 

CB 

OD 

RRC 

L 

CB 

OE 

RRC 

(HL) 

CB 

OF 

RRC 

A 

CB 

10 

RL 

B 

CB 

11 

RL 

C 

CB 

12 

RL 

D 

CB 

13 

RL 

E 

CB 

14 

RL 

H 

CB 

15 

RL 

L 

CB 

16 

RL 

(HL) 

CB 

17 

RL 

A 

CB 

18 

RR 

B 

CB 

19 

RR 

C 

CB 

1A 

RR 

D 

CB 

IB 

RR 

E 

CB 

1C 

RR 

H 

CB 

ID 

RR 

L 

CB 

IE 

RR 

(HL) 

CB 

IF 

RR 

A 

CB 

20 

SLA 

B 

CB 

21 

SLA 

C 

CB 

22 

SLA 

D 

CB 

23 

SLA 

E 

CB 

24 

SLA 

H 

CB 

25 

SLA 

L 

CB 

26 

SLA 

(HL) 

CB 

27 

SLA 

A 

CB 

28 

SRA 

B 

CB 

29 

SRA 

C 

CB 

2A 

SRA 

D 

CB 

2B 

SRA 

E 

CB 

2C 

SRA 

H 


Hex Mnemonic 


CB 

2D 

SRA 

L 

CB 

2E 

SRA 

(HL) 

CB 

2F 

SRA 

A 

CB 

38 

SRL 

B 

CB 

39 

SRL 

C 

CB 

3A 

SRL 

D 

CB 

3B 

SRL 

E 

CB 

3C 

SRL 

H 

CB 

3D 

SRL 

L 

CB 

3E 

SRL 

(HL) 

CB 

3F 

SRL 

A 

CB 

40 

BIT 

0,B 

CB 

41 

BIT 

0,C 

CB 

42 

BIT 

0,D 

CB 

43 

BIT 

0,E 

CB 

44 

BIT 

0,H 

CB 

45 

BIT 

0,L 

CB 

46 

BIT 

0,(HL) 

CB 

47 

BIT 

0,A 

CB 

48 

BIT 

l.B 

CB 

49 

BIT 

i,c 

CB 

4A 

BIT 

1,D 

CB 

4B 

BIT 

1,E 

CB 

4C 

BIT 

1.H 

CB 

4D 

BIT 

1,L 

CB 

4E 

BIT 

1,(HL) 

CB 

4F 

BIT 

1,A 

CB 

50 

BIT 

2,B 

CB 

51 

BIT 

2,C 

CB 

52 

BIT 

2,D 

CB 

53 

BIT 

2,E 

CB 

54 

BIT 

2,H 

CB 

55 

BIT 

2,L 

CB 

56 

BIT 

2,(HL) 

CB 

57 

BIT 

2,A 

CB 

58 

BIT 

3,B 

CB 

59 

BIT 

3,C 

CB 

5A 

BIT 

3,D 

CB 

5B 

BIT 

3,E 

CB 

5C 

BIT 

3,H 

CB 

5D 

BIT 

3,L 

CB 

5E 

BIT 

3,(HL) 
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Hex 


Mnemonic 

Hex 


Mnemonic 

CB 

5F 

BIT 

3,A 

CB 

89 

RES 

l,c 

CB 

60 

BIT 

4,B 

CB 

8A 

RES 

1.D 

CB 

61 

BIT 

4,C 

CB 

8B 

RES 

1.E 

CB 

62 

BIT 

4,D 

CB 

8C 

RES 

1,H 

CB 

63 

BIT 

4,E 

CB 

8D 

RES 

1.L 

CB 

64 

BIT 

4,H 

CB 

8E 

RES 

1»(HL) 

CB 

65 

BIT 

4,L 

CB 

8F 

RES 

l.A 

CB 

66 

BIT 

4,(HL) 

CB 

90 

RES 

2,B 

CB 

67 

BIT 

4,A 

CB 

91 

RES 

2,C 

CB 

68 

BIT 

5,B 

CB 

92 

RES 

2,D 

CB 

69 

BIT 

5,C 

CB 

93 

RES 

2,E 

CB 

6A 

BIT 

5,D 

CB 

94 

RES 

2,H 

CB 

6B 

BIT 

5,E 

CB 

95 

RES 

2,L 

CB 

6C 

BIT 

5,H 

CB 

96 

RES 

2,(HL) 

CB 

6D 

BIT 

5,L 

CB 

97 

RES 

2,A 

CB 

6E 

BIT 

5,(HL) 

CB 

98 

RES 

3,B 

CB 

6F 

BIT 

5,A 

CB 

99 

RES 

3,C 

CB 

70 

BIT 

6,B 

CB 

9A 

RES 

3,D 

CB 

71 

BIT 

6,C 

CB 

9B 

RES 

3,E 

CB 

72 

BIT 

6,D 

CB 

9C 

RES 

3,H 

CB 

73 

BIT 

6,E 

CB 

9D 

RES 

3,L 

CB 

74 

BIT 

6,H 

CB 

9E 

RES 

3,(HL) 

CB 

75 

BIT 

6,L 

CB 

9F 

RES 

3,A 

CB 

76 

BIT 

6,(HL) 

CB 

AO 

RES 

4,B 

CB 

77 

BIT 

6,A 

CB 

A1 

RES 

4,C 

CB 

78 

BIT 

7,B 

CB 

A2 

RES 

4,D 

CB 

79 

BIT 

7,C 

CB 

A3 

RES 

4,E 

CB 

7A 

BIT 

7,D 

CB 

A4 

RES 

4,H 

CB 

7B 

BIT 

7,E 

CB 

A5 

RES 

4,L 

CB 

7C 

BIT 

7,H 

CB 

A6 

RES 

4,(HL) 

CB 

7D 

BIT 

7,L 

CB 

A7 

RES 

4,A 

CB 

7E 

BIT 

7,(HL) 

CB 

A8 

RES 

5,B 

CB 

7F 

BIT 

7,A 

CB 

A9 

RES 

5,C 

CB 

80 

RES 

0,B 

CB 

AA 

RES 

5,D 

CB 

81 

RES 

0,C 

CB 

AB 

RES 

5,E 

CB 

82 

RES 

0,D 

CB 

AC 

RES 

5,H 

CB 

83 

RES 

0,E 

CB 

AD 

RES 

5,L 

CB 

84 

RES 

0,H 

CB 

AE 

RES 

5,(HL) 

CB 

85 

RES 

0,L 

CB 

AF 

RES 

5,A 

CB 

86 

RES 

0,(HL) 

CB 

BO 

RES 

6,B 

CB 

87 

RES 

0,A 

CB 

B1 

RES 

6,C 

CB 

88 

RES 

1»B 

CB 

B2 

RES 

6,D 
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Hex 


Mnemonic 

Hex 


Mnemonic 

CB 

B3 

RES 

6,E 

CB 

DD 

SET 

3,L 

CB 

B4 

RES 

6,H 

CB 

DE 

SET 

3,(HL) 

CB 

B5 

RES 

6,L 

CB 

DF 

SET 

3,A 

CB 

B6 

RES 

6,(HL) 

CB 

EO 

SET 

4,B 

CB 

B7 

RES 

6,A 

CB 

El 

SET 

4,C 

CB 

B8 

RES 

7,B 

CB 

E2 

SET 

4,D 

CB 

B9 

RES 

7,C 

CB 

E3 

SET 

4,E 

CB 

BA 

RES 

7,D 

CB 

E4 

SET 

4,H 

CB 

BB 

RES 

7,E 

CB 

E5 

SET 

4,L 

CB 

BC 

RES 

7,H 

CB 

E6 

SET 

4,(HL) 

CB 

BD 

RES 

7,L 

CB 

E7 

SET 

4,A 

CB 

BE 

RES 

7,(HL) 

CB 

E8 

SET 

5,B 

CB 

BF 

RES 

7,A 

CB 

E9 

SET 

5,C 

CB 

CO 

SET 

0,B 

CB 

EA 

SET 

5,D 

CB 

Cl 

SET 

0,C 

CB 

EB 

SET 

5,E 

CB 

C2 

SET 

0,D 

CB 

EC 

SET 

5,H 

CB 

C3 

SET 

0,E 

CB 

ED 

SET 

5,L 

CB 

C4 

SET 

0,H 

CB 

EE 

SET 

5,(HL) 

CB 

C5 

SET 

0,L 

CB 

EF 

SET 

5,A 

CB 

C6 

SET 

0,(HL) 

CB 

FO 

SET 

6,B 

CB 

C7 

SET 

0,A 

CB 

FI 

SET 

6,C 

CB 

C8 

SET 

l.B 

CB 

F2 

SET 

6,D 

CB 

C9 

SET 

i,c 

CB 

F3 

SET 

6,E 

CB 

CA 

SET 

1,D 

CB 

F4 

SET 

6,H 

CB 

CB 

SET 

1.E 

CB 

F5 

SET 

6,L 

CB 

CC 

SET 

l.H 

CB 

F6 

SET 

6,(HL) 

CB 

CD 

SET 

1,L 

CB 

F7 

SET 

6,A 

CB 

CE 

SET 

l.(HL) 

CB 

F8 

SET 

7,B 

CB 

CF 

SET 

l.A 

CB 

F9 

SET 

7,C 

CB 

DO 

SET 

2,B 

CB 

FA 

SET 

7,D 

CB 

D1 

SET 

2,C 

CB 

FB 

SET 

7,E 

CB 

D2 

SET 

2,D 

CB 

FC 

SET 

7,H 

CB 

D3 

SET 

2,E 

CB 

FD 

SET 

7,L 

CB 

D4 

SET 

2,H 

CB 

FE 

SET 

7,(HL) 

CB 

D5 

SET 

2,L 

CB 

FF 

SET 

7,A 

CB 

D6 

SET 

2,(HL) 

CC 

nnnn 

* CALL 

Z.nnnn 

CB 

D7 

SET 

2,A 

CD 

nnnn 

* CALL 

nnnn 

CB 

D8 

SET 

3,B 

CE 

nn 

* ADC 

A,nn 

CB 

D9 

SET 

3,C 

CF 


* RST 

8 

CB 

DA 

SET 

3,D 

DO 


* RET 

NC 

CB 

DB 

SET 

3,E 

D1 


* POP 

DE 

CB 

DC 

SET 

3,H 

D2 

nnnn 

* JP 

NC.nnnn 
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Hex 


Mnemonic 

D3 

nn 

* OUT 

(nn),A 

D4 

nnnn 

* CALL 

NC,nnnn 

D5 


* PUSH 

DE 

D6 

nn 

* SUB 

nn 

D7 


♦ RST 

10H 

D8 


* RET 

C 

D9 


EXX 


DA 

nnnn 

* JP 

C,nnnn 

DB 

nn 

* IN 

A,(nn) 

DC 

nnnn 

* CALL 

C.nnnn 

DD 

09 

ADD 

IX, BC 

DD 

19 

ADD 

IX,DE 

DD 

21nnnn 

LD 

IX,nnnn 

DD 

22nnnn 

LD 

(nnnn),IX 

DD 

23 

INC 

IX 

DD 

29 

ADD 

DC,IX 

DD 

2Annnn 

LD 

IX,(nnnn) 

DD 

2B 

DEC 

DC 

DD 

34dd 

INC 

(IX+dd) 

DD 

35dd 

DEC 

(IX+dd) 

DD 

36ddnn 

LD 

(IX+dd),nn 

DD 

39 

ADD 

IX, SP 

DD 

46dd 

LD 

B,(IX+dd) 

DD 

4Edd 

LD 

C,(IX + dd) 

DD 

56dd 

LD 

D,(IX+dd) 

DD 

5Edd 

LD 

E,(IX+dd) 

DD 

66dd 

LD 

H,(IX+dd) 

DD 

6Edd 

LD 

L,(IX+dd) 

DD 

70dd 

LD 

(IX+dd),B 

DD 

71dd 

LD 

(IX+dd),C 

DD 

72dd 

LD 

(IX+dd),D 

DD 

73dd 

LD 

(IX+dd),E 

DD 

74dd 

LD 

(IX+dd),H 

DD 

75dd 

LD 

(IX+dd),L 

DD 

77dd 

LD 

(IX+dd),A 

DD 

7Edd 

LD 

A,(IX+dd) 

DD 

86dd 

ADD 

A,(IX + dd) 

DD 

8Edd 

ADC 

A,(IX+dd) 

DD 

96dd 

SUB 

(IX+dd) 

DD 

9Edd 

SBC 

A,(IX+dd) 

DD 

A6dd 

AND 

(IX+dd) 

DD 

AEdd 

XOR 

(IX+dd) 


Hex Mnemonic 


DD 

B6dd 

OR 

(IX+dd) 

DD 

BEdd 

CP 

(IX+dd) 

DD 

CBdd06 

RLC 

(IX+dd) 

DD 

CBddOE 

RRC 

(IX+dd) 

DD 

CBddl6 

RL 

(IX+dd) 

DD 

CBddlE 

RR 

(IX+dd) 

DD 

CBdd26 

SLA 

(IX+dd) 

DD 

CBdd2E 

SRA 

(IX+dd) 

DD 

CBdd3E 

SRL 

(IX+dd) 

DD 

CBdd46 

BIT 

0,(IX+dd) 

DD 

CBdd4E 

BIT 

1,(IX+dd) 

DD 

CBdd56 

BIT 

2,(IX+dd) 

DD 

CBdd5E 

BIT 

3,(IX + dd) 

DD 

CBdd66 

BIT 

4,(IX+dd) 

DD 

CBdd6E 

BIT 

5,(IX+dd) 

DD 

CBdd76 

BIT 

6,(IX+dd) 

DD 

CBdd7E 

BIT 

7,(IX+dd) 

DD 

CBdd86 

RES 

0,(IX+dd) 

DD 

CBdd8E 

RES 

1,(IX+dd) 

DD 

CBdd96 

RES 

2,(IX+dd) 

DD 

CBdd9E 

RES 

3,(IX+dd) 

DD 

CBddA6 

RES 

4,(IX+dd) 

DD 

CBddAE 

RES 

5,(IX+dd) 

DD 

CBddB6 

RES 

6,(IX+dd) 

DD 

CBddBE 

RES 

7,(IX+dd) 

DD 

CBddC6 

SET 

0,(IX+dd) 

DD 

CBddCE 

SET 

1,(IX+dd) 

DD 

CBddD6 

SET 

2,(IX+dd) 

DD 

CBddDE 

SET 

3,(IX+dd) 

DD 

CBddE6 

SET 

4,(IX+dd) 

DD 

CBddEE 

SET 

5,(IX+dd) 

DD 

CBddF6 

SET 

6,(IX + dd) 

DD 

CBddFE 

SET 

7,(IX+dd) 

DD 

El 

POP 

IX 

DD 

E3 

EX 

(SP),IX 

DD 

E5 

PUSH 

IX 

DD 

E9 

JP 

(IX) 

DD 

F9 

LD 

SP,IX 

DE 

nn 

* SBC 

A,nn 

DF 


* RST 

18H 

E0 


* RET 

PO 

El 


* POP 

HL 
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Hex 

Mnemonic 

Hex 

Mnemonic 

E2 

nnnn 

* JP 

PO,nnnn 

ED 

69 

OUT 

(C),L 

E3 


* EX 

(SP),HL 

ED 

6A 

ADC 

HL,HL 

E4 

nnnn 

* CALL 

PO,nnnn 

ED 

6F 

RLD 


E5 


* PUSH 

HL 

ED 

72 

SBC 

HL,SP 

E6 

nn 

* AND 

nn 

ED 

73nnnn 

LD 

(nnnn),SP 

E7 


* RST 

20H 

ED 

78 

IN 

A,(C) 

E8 


* RET 

PE 

ED 

79 

OUT 

(C),A 

E9 


* JP 

(HL) 

ED 

7A 

ADC 

HL,SP 

EA 

nnnn 

* JP 

PE, nnnn 

ED 

7Bnnnn 

LD 

SP,(nnnn) 

EB 


* EX 

DE,HL 

ED 

AO 

LDI 


EC 

nnnn 

* CALL 

PE, nnnn 

ED 

A1 

CPI 


ED 

40 

IN 

B,(C) 

ED 

A2 

INI 


ED 

41 

OUT 

(Q.B 

ED 

A3 

OUTI 


ED 

42 

SBC 

HL,BC 

ED 

A8 

LDD 


ED 

43nnnn 

LD 

(nnnn),BC 

ED 

A9 

CPD 


ED 

44 

NEG 


ED 

AA 

IND 


ED 

45 

RETN 


ED 

AB 

OUTD 


ED 

46 

IM 

0 

ED 

BO 

LDIR 


ED 

47 

LD 

I,A 

ED 

B1 

CPIR 


ED 

48 

IN 

C,(C) 

ED 

B2 

INIR 


ED 

49 

OUT 

(C),C 

ED 

B3 

OTIR 


ED 

4A 

ADC 

HL,BC 

ED 

B8 

LDDR 


ED 

4Bnnnn 

LD 

BC,(nnnn) 

ED 

B9 

CPDR 


ED 

4D 

RETI 


ED 

BA 

INDR 


ED 

4F 

LD 

R,A 

ED 

BB 

OTDR 


ED 

50 

IN 

D,(C) 

EE 

nn 

* XOR 

N 

ED 

51 

OUT 

(C),D 

EF 


* RST 

28H 

ED 

52 

SBC 

HL,DE 

F0 


* RET 

P 

ED 

53nnnn 

LD 

(nnnn),DE 

FI 


* POP 

AF 

ED 

56 

IM 

1 

F2 

nnnn 

* JP 

P,nnnn 

ED 

57 

LD 

A,I 

F3 


* DI 


ED 

58 

IN 

E,(C) 

F4 

nnnn 

* CALL 

P,nnnn 

ED 

59 

OUT 

(C),E 

F5 


* PUSH 

AF 

ED 

5A 

ADC 

HL,DE 

F6 

nn 

* OR 

nn 

ED 

5Bnnnn 

LD 

DE,(nnnn) 

F7 


* RST 

30H 

ED 

5E 

IM 

2 

F8 


* RET 

M 

ED 

5F 

LD 

A,R 

F9 


* LD 

SP,HL 

ED 

60 

IN 

H,(C) 

FA 

nnnn 

* JP 

M,nnnn 

ED 

61 

OUT 

(C),H 

FB 


* El 


ED 

62 

SBC 

HL,HL 

FC 

nnnn 

* CALL 

M,nnnn 

ED 

67 

RRD 


FD 

09 

ADD 

IY,BC 

ED 

68 

IN 

L,(C) 

FD 

19 

ADD 

IY,DE 
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Hex 


Mnemonic 

Hex 


Mnemonic 

FD 

21nnnn 

LD 

IY,nnnn 

FD 

CBddlE 

RR 

(IY+dd) 

FD 

22nnnn 

LD 

(nnnn),IY 

FD 

CBdd26 

SLA 

(IY+dd) 

FD 

23 

INC 

IY 

FD 

CBdd2E 

SRA 

(IY + dd) 

FD 

29 

ADD 

IY,IY 

FD 

CBdd3E 

SRL 

(IY+dd) 

FD 

2Annnn 

LD 

IY,(nnnn) 

FD 

CBdd46 

BIT 

0,(IY + dd) 

FD 

2B 

DEC 

IY 

FD 

CBdd4E 

BIT 

1,(IY+dd) 

FD 

34dd 

INC 

(IY+dd) 

FD 

CBdd56 

BIT 

2,(IY + dd) 

FD 

35dd 

DEC 

(IY+dd) 

FD 

CBdd5E 

BIT 

3,(IY+dd) 

FD 

36ddnn 

LD 

(IY+dd),nn 

FD 

CBdd66 

BIT 

4,(IY + dd) 

FD 

39 

ADD 

IY,SP 

FD 

CBdd6E 

BIT 

5,(IY+dd) 

FD 

46dd 

LD 

B,(IY+dd) 

FD 

CBdd76 

BIT 

6,(IY + dd) 

FD 

4Edd 

LD 

C,(IY+dd) 

FD 

CBdd7E 

BIT 

7,(IY+dd) 

FD 

56dd 

LD 

D,(IY+dd) 

FD 

CBdd86 

RES 

0,(IY + dd) 

FD 

5Edd 

LD 

E,(IY+dd) 

FD 

CBdd8E 

RES 

1,(IY+dd) 

FD 

66dd 

LD 

H,(IY + dd) 

FD 

CBdd96 

RES 

2,(IY+dd) 

FD 

6Edd 

LD 

L,(IY + dd) 

FD 

CBdd9E 

RES 

3,(IY + dd) 

FD 

70dd 

LD 

(IY + dd),B 

FD 

CBddA6 

RES 

4,(IY+dd) 

FD 

71dd 

LD 

(IY+dd),C 

FD 

CBddAE 

RES 

5,(IY+dd) 

FD 

72dd 

LD 

(IY+dd),D 

FD 

CBddB6 

RES 

6,(IY + dd) 

FD 

73dd 

LD 

(IY+dd),E 

FD 

CBddBE 

RES 

7,(IY+dd) 

FD 

74dd 

LD 

(IY+dd),H 

FD 

CBddC6 

SET 

0,(IY + dd) 

FD 

75dd 

LD 

(IY+dd),L 

FD 

CBddCE 

SET 

1,(IY+dd) 

FD 

77dd 

LD 

(IY + dd), A 

FD 

CBddD6 

SET 

2,(IY + dd) 

FD 

7Edd 

LD 

A,(IY+dd) 

FD 

CBddDE 

SET 

3,(IY+dd) 

FD 

86dd 

ADD 

A,(IY + dd) 

FD 

CBddE6 

SET 

4,(IY + dd) 

FD 

8Edd 

ADC 

A,(IY+dd) 

FD 

CBddEE 

SET 

5,(IY+dd) 

FD 

96dd 

SUB 

(IY+dd) 

FD 

CBddF6 

SET 

6,(IY + dd) 

FD 

9Edd 

SBC 

A,(IY+dd) 

FD 

CBddFE 

SET 

7,(IY+dd) 

FD 

A6dd 

AND 

(IY+dd) 

FD 

El 

POP 

IY 

FD 

AEdd 

XOR 

(IY+dd) 

FD 

E3 

EX 

(SP),IY 

FD 

B6dd 

OR 

(IY+dd) 

FD 

E5 

PUSH 

IY 

FD 

BEdd 

CP 

(IY+dd) 

FD 

E9 

JP 

(IY) 

FD 

CBdd06 

RLC 

(IY+dd) 

FD 

F9 

LD 

SP,IY 

FD 

CBddOE 

RRC 

(IY + dd) 

FE 

nn 

* CP 

nn 

FD 

CBddl6 

RL 

(IY+dd) 

FF 


* RST 

38H 


















APPENDIX G 


Details of the 8080 
Instruction Set 


A summary of the 8080 instruction set is given in this appendix. The 
instructions are listed alphabetically by the official Intel mnemonic. The 
Zilog (Z80) version of the mnemonic is shown in angle brackets. 

The letters A, B, C, D, E, H, L, and SP are used for the standard 8080 
register names. In addition, the symbols BC, DE, and HL are used for the 
register pairs. The following symbols are used for general parameters: 

r, r2 8-bit CPU register 
nn General 8-bit constant 
nnnn 16-bit constant 

The flag bits are represented by the following symbols: 

C Carry 
H Half carry 
N Add/subtract 
P Parity 
S Sign 

Z Zero • 

For the Zilog mnemonic, pointers to memory or input/output addresses 
are enclosed in parentheses. 
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ACI nn < ADC A,nn> 

Add the constant nn to the accumulator and the carry flag. The result is 
placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag reset: N 

ADC M <ADC A,(HL)> 

Add the memory byte referenced by the HL register to the accumulator 
and the carry flag. The result is placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag reset: N 

ADC r < ADC A ( r> 

Add the value in register r to the accumulator and the carry flag. The 
result is placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag reset: N 

ADD M <ADD A,(HL)> 

Add the memory byte referenced by the HL register to the accumulator. 
The result is placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag reset: N 

ADD r <ADD A,r> 

Add the value in register r to the accumulator. The result is placed in the 
accumulator. 

Flags affected: C, H, O, S, Z 
Flag reset: N 

ADI nn <ADD A,nn> 

Add the constant nn to the accumulator. The result is placed in A. 
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Flags affected: C, H, O, S, Z 
Flag reset: N 


ANA M <AND (HL)> 

Perform a logical AND with the accumulator and the memory location 
referenced by the HL register. The result is placed in the accumulator. 

Flags affected: P, S, Z 
Flags reset: C, N 

Flag set: H 


ANA r <AND r> 

Perform a logical AND with the accumulator and register r. The result is 
placed in the accumulator. The instruction ANA A is an effective way to 
test the parity, sign, and zero flags, because this instruction does not alter 
the value in A. 

Flags affected: P, S, Z 
Flags reset: C, N 

Flag set: H 


ANI nn <AND nn> 

Perform a logical AND with the accumulator and the constant given as 
the parameter. The result is placed in the accumulator. This instruction 
can be used to selectively reset bits of the accumulator. For example, the 
instruction ANI 7FH will reset bit 7. 

Flags affected: P, S, Z 
Flags reset: C, N 

Flag set: H 


CALL nnnn <CALL nnnn> 

Unconditional subroutine call to address nnnn. The address of the 
following instruction is pushed onto the stack. 

Flags affected: none 
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cc 

nnnn 

<CALL 

C,nnnn> 

CM 

nnnn 

<CALL 

M,nnnn> 

CNC 

nnnn 

<CALL 

NC,nnnn> 

CNZ 

nnnn 

CCALL 

NZ,nnnn> 

CP 

nnnn 

<CALL 

P,nnnn> 

CPE 

nnnn 

CCALL 

PE,nnnn> 

CPO 

nnnn 

CCALL 

PO,nnnn> 

CZ 

nnnn 

CCALL 

Z,nnnn> 


Conditional subroutine call to address nnnn. The address of the following 
instruction is pushed onto the stack. The conditions are as follows. 


c 

Means carry flag set 

(Carry) 

M 

Means sign flag set 

(Minus) 

NC 

Means carry flag reset 

(Not carry) 

NZ 

Means zero flag reset 

(Not zero) 

P 

Means sign flag reset 

(Plus) 

PE 

Means parity flag set 

(Parity even) 

PO 

Means parity flag reset 

(Parity odd) 

Z 

Means zero flag set 

(Zero) 


CMA <CPL> 

Complement the accumulator. This instruction performs a one’s comple¬ 
ment on the accumulator; that is, each bit that has a value of 0 is changed 
to 1, and each bit that has a value of 1 is changed to 0. 

Flags set: H, N 
CMC <CCF> 

Complement the carry flag. This instruction can be given after an STC 
command to reset the carry flag. 

Flag affected: C 
Flag reset: N 


CMP M <CP (HL)> 

Compare the byte in memory referenced by the HL register to the 
accumulator, which is an implied operand. The zero flag is set if the ac¬ 
cumulator is equal to the operand. The carry flag is set if the accumulator 
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is smaller than the operand. 

Flags affected: C, H, O, S, Z 
Flag set: N 


CMP r <CP r> 

Compare register r to the accumulator, which is an implied operand. The 
zero flag is set if the accumulator is equal to the operand. The carry flag is 
set if the accumulator is smaller than the operand. 

Flags affected: C, H, O, S, Z 
Flag set: N 


CPI nn <CP nn> 

Compare the constant given in the operand to the accumulator, which is 
an implied operand. The zero flag is set if the accumulator is equal to the 
operand. The carry flag is set if the accumulator is smaller than the 
operand. 

Flags affected: C, H, O, S, Z 
Flag set: N 


DAA <DAA> 

Decimal adjust the accumulator. This instruction is used after each addi¬ 
tion with BCD numbers. The Z80 performs this operation properly for 
both addition and subtraction. The 8080, however, gives an incorrect 
result for subtraction. 

Flags affected: C, H, O, S, Z 


DAD B <ADD HL,BC> 

DAD D <ADD HL,DE> 

DAD H <ADD HL,HL> 

DAD SP <ADD HL,SP> 

Add the specified double register to the HL register. The result is placed in 
HL. This is a double-precision addition. The carry flag is set if the result is 
greater than 16 bits (if overflow occurs). The instruction DAD H per¬ 
forms a 16-bit arithmetic shift left, effectively doubling the HL value. The 
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DAD SP instruction can be used to save an incoming stack pointer. 

LXI H,0 

DAD SP 

SHLD OLDSTK 

Flags affected: C, H, O, S, Z 
Flag reset: N 


DCR M <DEC (HL)> 

Decrement the memory byte referenced by the HL register. 

Flags affected: H, O, S, Z 
Flag set: N 

Flag not affected: C 


DCR r <DEC r> 

Decrement register r. Do not try to decrement a register past zero while 
executing a JNC loop. The carry flag is not affected by this operation. 


Flags affected: 

H, O, S, Z 

Flag set: 

N 


Flag not affected: C 


DCX 

B 

<DEC 

BC> 

DCX 

D 

<DEC 

DE> 

DCX 

H 

<DEC 

HL> 

DCX 

SP 

<DEC 

SP> 


Decrement the indicated double register. Do not try to decrement a double 
register to zero in a JNZ loop. It will not work because this operation does 
not affect any of the PSW flags. Instead, move one byte of the double 
register into the accumulator and perform a logical OR with the other byte. 

REPEAT: 


MOV A,C 
ORA B 
JNZ REPEAT 


Flags affected: none 










356 MASTERING CP/M 


Dl <DI> 

Disable interrupt request. 

El <EI> 

Enable interrupt request. 

HLT <HALT> 

Suspend operation of the CPU until a reset or interrupt occurs. 

IN nn <IN A,(nn)> 

Input a byte to the accumulator from the port address nn. 

Flags affected: none 


INR M <INC (HL)> 

Increment the memory byte referenced by the HL register. 
Flags affected: H, O, S, Z 
Flag set: N 

Flag not affected: C 


INR r <INC r> 

Increment the 8-bit register. Do not try to increment a register past zero 
while executing a JNC loop. It will not work because the carry flag is un¬ 
affected by this instruction. 


Flags affected: 

H, O, 

s, z 

Flag set: 

N 


Flag not affected: C 


INX B 

< INC 

BO 

INX D 

<INC 

DE> 

INX H 

<INC 

HL> 

INX SP 

<INC 

SP> 


Increment the specified double register. 
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Flags affected: none 


JAAP nnnn <JP nnnn> 

Unconditional jump to address nnnn. 

Flags affected: none 


JC 

nnnn 

<jp 

C,nnnn> 

JM 

nnnn 

<jp 

AA,nnnn> 

JNC 

nnnn 

<jp 

NC,nnnn> 

JNZ 

nnnn 

<jp 

NZ,nnnn> 

JP 

nnnn 

<jp 

P,nnnn> 

JPE 

nnnn 

<jp 

PE,nnnn> 

JPO 

nnnn 

<jp 

PO,nnnn> 

JZ 

nnnn 

<jp 

Z,nnnn> 


Conditional jump to address nnnn where: 


c 

Means carry flag set 

(Carry) 

M 

Means sign flag set 

(Minus) 

NC 

Means carry flag reset 

(Not carry) 

NZ 

Means zero flag reset 

(Not zero) 

P 

Means sign flag reset 

(Plus) 

PE 

Means parity flag set 

(Parity even) 

PO 

Means parity flag reset 

(Parity odd) 

Z 

Means zero flag set 

(Zero) 


LDA nnnn <LD A,(nnnn)> 

Load the accumulator from the memory byte referenced by the 16-bit 
pointer nnnn. 


LDAX B <LD A,(BCJ> 

LDAX D <LD A,(DE)> 

Move the memory byte referenced by the specified double register BC or 
DE into the accumulator. (See STAX B.) 

LHLD nnnn <LD HL,(nnnn)> 

Load register L from the address referenced by the 16-bit value nnnn. 
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Load register H from the address nnnn + 1. 


LXI 

B,nnnn 

<LD 

BC,nnnn> 

LXI 

D,nnnn 

<LD 

DE,nnnn> 

LXI 

H,nnnn 

. <LD 

HL,nnnn> 

LXI 

SP,nnnn 

<LD 

SP,nnnn> 


Load the specified double register with the 16-bit constant nnnn. 


MOV M,r <LD (HL),r> 

Move the byte in register r to the memory byte referenced by the HL 
register. 


MOV r,M <LD r,(HL)> 

Move the byte referenced by the HL register into register r. 

MOV r,r2 <LD r,r2> 

Move the byte from register r2 to r. 

MVI M ; nn <LD (HL),nn> 

Move the data byte nn into the memory location referenced by the HL 
register. 


MVI r,nn <LD r,nn> 

Load register r with the 8-bit data byte nn. 


NOP <NOP> 

No operation is performed by the CPU. 
Flags affected: none 


ORA M COR (HL)> 

Perform a logical OR with the accumulator and the memory byte 
referenced by the HL register. The result is placed in the accumulator. 
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Flags affected: P, S, Z 
Flags reset: C, H, N 


ORA r <OR r> 

Perform a logical OR with the accumulator and register r. The result is 
placed in the accumulator. An instruction of ORA A is an efficient way to 
test the parity, sign, and zero flags, because this instruction does not alter 
the value in A. 

Flags affected: P, S, Z 
Flags reset: C, H, N 


ORI nn <OR nn> 

Perform a logical OR with the accumulator and the data byte nn. The 
result is placed in the accumulator. This instruction can be used to set 
individual bits of the accumulator. For example, ORI 20H will set bit 5 to 
a logical 1. 

Flags affected: P, S, Z 
Flags reset: C, H, N 


OUT nn <OUT (nn),A> 

Output the byte in the accumulator to the port address nn. 
Flags affected: none 


PCHL <JP (HL)> 

Copy the HL register into the program counter, then retrieve the next 
instruction from the address referenced by HL. This instruction causes a 
branch to the address referenced by HL. 


Flags affected: none 


POP B 

<POP 

BC> 

POP D 

<POP 

DE> 

POP H 

<POP 

HL> 


Copy two bytes of memory into the appropriate double register as 
follows. The memory byte referenced by the stack pointer is moved into 
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the low-order byte (C, E, or L), then the stack pointer is incremented. The 
memory byte referenced by the new stack-pointer value is then moved 
into the high-order byte (B, D, or H). The stack pointer is incremented a 
second time. 

Flags affected: none 


POP PSW <POP AF> 

Move the byte at the memory location referenced by the stack pointer into 
the flag register (PSW), and increment the stack pointer. Then move the 
byte at the location referenced by the new stack-pointer value into the 
accumulator and increment the stack pointer a second time. 

Flags affected: all 


PUSH B <PUSH BC> 

PUSH D <PUSH DE> 

PUSH H <PUSH HL> 

Store the referenced double register in memory as follows. The stack 
pointer is decremented, then the byte in the specified high-order register 
B, D, or H is copied to the memory location referenced by the stack 
pointer. The stack pointer is decremented a second time. The byte in the 
low-order register C, E, or L is moved to the byte referenced by the current 
value of the stack pointer. 

Flags affected: none 


PUSH PSW <PUSH AF> 

Store the accumulator and flag register in memory as follows. The stack 
pointer is decremented, then the value in the accumulator is moved to the 
memory byte referenced by the stack pointer. The stack pointer is 
decremented a second time. The flag register is copied to the byte at the 
memory address referenced by the current stack-pointer value. 

Flags affected: none 
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C 


1 1 1 1 1 1 1 

7 -«-6 -*“5 -*-4 3 2 1 0 

1 II_1_1_1_1_ 


Carry 

Register 


RAL <RLA> 

This instruction rotates bits to the left through carry by one position. The 
byte in the accumulator is rotated left through carry. The carry flag moves 
to bit 0. Bit 7 of the accumulator moves to the carry flag. 

Flags affected: C 
Flags reset: H, N 


< 4 - 


i i i i i i i 

* 7 -► 6 —► 5 -► 4 —► 3 -► 2 -► 1 —► 0 


c - 

1 1 1 1 1 1 1— 




Register Carry 


RAR < RRA> 

This instruction rotates bits to the right through carry by one position. 
The accumulator is rotated right through carry. The carry flag moves to 
bit 7. Bit 0 moves to the carry flag. 

Flag affected: C 
Flags reset: H, N 

RET <RET> 

Return from a subroutine. The top of the stack is moved into the program 
counter. The stack pointer is incremented twice. 
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RC 

<RET 

C> 

RM 

<RET 

M> 

RNC 

<RET 

NC> 

RNZ 

<RET 

NZ> 

RP 

<RET 

P> 

RPE 

<RET 

PE> 

RPO 

<RET 

PO> 

RZ 

<RET 

Z> 


Conditional return from a subroutine. If the condition is met, the top of 
the stack is moved into the program counter. The stack pointer is 
incremented twice. 


c 

Means carry flag set 

(Carry) 

M 

Means sign flag set 

(Minus) 

NC 

Means carry flag reset 

(Not carry) 

NZ 

Means zero flag reset 

(Not zero) 

P 

Means sign flag reset 

(Plus) 

PE 

Means parity flag set 

(Parity even) 

PO 

Means parity flag reset 

(Parity odd) 

Z 

Means zero flag set 

(Zero) 



Carry 


Register 


RLC < RLCA> 

This instruction rotates bits to the left by one position. The accumulator is 
rotated left circularly. Bit 7 moves to both the zero bit and the carry flag. 

Flags affected: C 
Flags reset: H, N 
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Register 


Carry 


RRC < RRCA> 

This instruction rotates bits to the right by one position. The accumulator 
is rotated right circularly. Bit 0 moves to both the carry flag and bit 7. 


Flag affected: 

c 


Flags reset: 

H, N 


RST 

0 

<RST 

00H> 

RST 

1 

<RST 

08H> 

RST 

2 

<RST 

10H> 

RST 

3 

<RST 

18H> 

RST 

4 

<RST 

20H> 

RST 

5 

<RST 

28H> 

RST 

6 

<RST 

30H> 

RST 

7 

<RST 

38H> 


These restart instructions generate one-byte subroutine calls to the address 
given in the Z80 operand. For example, RST 7 calls address 38 hex. 


SBB M <SBC A,(HL)> 

Subtract the carry flag and the memory byte referenced by the HL register 
from the accumulator. The result is placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag set: N 

SBB r <SBC A,r> 

Subtract the carry flag and the specified CPU register from the accumula¬ 
tor. The result is placed in the accumulator. 
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Flags affected: C, H, O, S, Z 
Flag set: N 


SBI nn <SBC A,nn> 

Subtract the data byte nn and the carry flag from the accumulator. The 
result is placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag set: N 


SHLD nnnn <LD (nnnn),HL> 

Store register L at the memory address nnnn. Store register H at the address 
nnnn + 1. 


SPHL <LD SP,HL> 

Load the stack pointer from the HL register. This instruction can be used 
to retrieve a previously saved stack pointer. 

LHLD nnnn 
SPHL 


STA nnnn <LD (nnnn),A> 

Store the accumulator in the memory location referenced by nnnn. 


STAX B <LD (BC),A> 

STAX D <LD (DE),A> 

Move the byte in the accumulator to the memory byte referenced by the 
specified register pair. (See LDAX B.) 


STC <SCF> 

Set the carry flag. There is no equivalent reset command. However, the 
carry flag can be reset with the XRA A instruction or with the pair of in¬ 
structions STC and CMC. 

Flag set: C 

Flags reset: H, N 
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SUB M <SUB (HL)> 

Subtract the memory byte referenced by the HL register from the accu¬ 
mulator. The result is placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag set: N 

SUB r <SUB r> 

Subtract the specified CPU register from the accumulator. The result is 
placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag set: N 

SUI nn <SUB nn> 

Subtract the data byte nn from the accumulator. The result is placed in the 
accumulator. 

Flags affected: C, H, O, S, Z 
Flag set: N 

XCHG <EX DE,HL> 

Exchange the double registers DE and HL. 

Flags affected: none 

XRA M <XOR (HL)> 

Perform a logical exclusive OR with the accumulator and the byte 
referenced by the HL register. The result is placed in the accumulator. 

Flags affected: P, S, Z 
Flags reset: C, H, N 

XRA r <XOR r> 

Perform a logical exclusive OR with the accumulator and register r. The 
result is placed in the accumulator. The XRA A instruction is an efficient 
way to zero the accumulator, although all flags are then reset. XRA A is 
also frequently used to reset the carry flag, because there is no single 
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instruction for this operation. 

Flags affected: P, S, Z 
Flags reset: C, H, N 

XRI nn <XOR nn> 

Perform a logical exclusive OR with the accumulator and the data byte 
nn. The result is placed in the accumulator. 

Flags affected: P, S, Z 
Flags reset: C, H, N 

XTHL <EX (SP),HL> 

Exchange the byte in memory referenced by the stack pointer with register 
L. Exchange the byte referenced by the stack pointer + 1 with register H. 

Flags affected: none 








APPENDIX H 


Details of the Z80 
Instruction Set 


A summary of the Z80 instruction set is given in this appendix. * The in¬ 
structions are listed alphabetically by the official Zilog mnemonic. If 
there is a corresponding 8080 instruction, the Intel mnemonic is shown in 
angle brackets; refer to Appendix G for the details of this instruction. If 
there is no 8080 equivalent, “no 8080” is shown in angle brackets. The 
Z80 mnemonics are listed in numeric order in Appendix F. The Z80 
equivalent of an 8080 mnemonic can be found from the cross reference 
given in Appendix G. 

The letters A, B, C, D, E, H, I, L, IX, IY, R, and SP are used for the 
standard Z80 register names. In addition, the symbols BC, DE, and HL 
are used for the register pairs. The following symbols are used for general 
parameters: 

r, r2 8-bit CPU register 

dd 8-bit signed displacement 

nn General 8-bit constant 

nnnn 16-bit constant 

The flag bits are represented by the following symbols: 

C Carry 

H Half carry 

N Add/subtract 

P/O Parity/overflow 
S Sign 

Z Zero 

Pointers to memory and input/output addresses are enclosed in paren¬ 
theses. 


•More details can be be obtained from the Zilog programmer’s manual, Z80 
Assembly Language Programming Manual, Zilog, Inc., 1977. 
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ADC A,(HL) <ADC M> 


ADC A,(IX+dd) <no8080> 

ADC A,(IY+dd) <no 8080> 

Add the memory byte referenced by the sum of the specified index register 
and the displacement to the accumulator and the carry flag. The result is 
placed in the accumulator. 


Flags affected: 

C, H, O, S, Z 

Flag reset: 

N 

ADC 

A,r 

<ADC r> 

ADC 

A,nn 

<ACI nn> 

ADC 

HL,BC 

< no 8080> 

ADC 

HL,DE 

< no 8080> 

ADC 

HL,HL 

< no 8080> 

ADC 

HL,SP 

< no 8080> 


Add the indicated double register to the HL register and the carry flag. 
The result is placed in HL. 

Flags affected: C, H, O, S, Z 
Flag reset: N 


ADD A,(HL) <ADD M> 


ADD A,(IX + dd) <no8080> 

ADD A,(IY+dd) <no8080> 

Add the memory byte pointed to by the sum of the specified index register 
and the displacement to the accumulator. The result is placed in the ac¬ 
cumulator. 

Flags affected: C, H, O, S, Z 
Flag reset: N 


ADD A,r 


<ADD r> 
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ADD 

A,nn 

<ADI nn> 

ADD 

HL,BC 

<DAD B> 

ADD 

HL,DE 

<DAD D> 

ADD 

HL,HL 

<DAD H> 

ADD 

HL,SP 

<DAD SP> 

ADD 

IX, BC 

< no 8080> 

ADD 

IX, DE 

< no 8080> 

ADD 

IX, IX 

< no 8080> 

ADD 

IX,SP 

< no 8080> 

ADD 

IY,BC 

< no 8080> 

ADD 

IY,DE 

< no 8080> 

ADD 

IY, 1Y 

< no 8080> 

ADD 

IY,SP 

< no 8080> 


Add the indicated double register to the specified index register. The 
result is placed in the index register. The HL register pair does not par¬ 
ticipate in this group of instructions. Notice that there is no equivalent 
series of ADC instructions. 

Flags affected: C, O, S, Z 
Flag reset: N 


AND (HL) <ANA M> 


AND (IX + dd) < no 8080> 

AND (IY+dd) < no 8080> 

Perform a logical AND with the accumulator and the memory byte 
referenced by the sum of the index register and the displacement. The 
result is placed in the accumulator. 

Flags affected: P, S, Z 
Flags reset: C, N 

Flag set: H 


AND 


<ANA r> 


AND 


nn 


< ANI 


nn> 
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BIT 

b,(HL) 

< no 8080> 

BIT 

b,(IX + dd) 

< no 8080> 

BIT 

b,(IY+dd) 

< no 8080> 


Test bit b of the memory byte referenced by the second operand. Bit b can 
range from 0 through 7. The zero flag is set if the referenced bit is a logical 
1, otherwise it is reset. Thus the zero flag becomes the complement of the 
selected bit. 

Flag affected: Z 
Flag set: H 

Flag reset: N 


BIT b,r < no 8080> 

Test bit b of register r, where b can range from 0 through 7. The zero flag is 
set if the referenced bit is a logical 1. It is reset otherwise. 


Flag affected: Z 



Flag set: H 



Flag reset: N 



CALL 

nnnn 

<CALL 

nnnn> 

CALL 

C,nnnn 

<CC 

nnnn> 

CALL 

AA,nnnn 

<CM 

nnnn> 

CALL 

NC,nnnn 

<CNC 

nnnn> 

CALL 

NZ,nnnn 

<CNZ 

nnnn> 

CALL 

P,rmnn 

<CP 

nnnn> 

CALL 

PE,nnnn 

<CPE 

nnnn> 

CALL 

PO,nnnn 

<CPO 

nnnn> 

CALL 

Z,nnnn 

<CZ 

nnnn> 

CCF 

<CMC> 



CP 

(HL) 

<CMP AA> 


CP 

(IX+dd) 

< no 8080> 


CP 

(lY + dd) 

<no 8080> 



Compare the memory location referenced by the sum of the index register 
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and the displacement to the accumulator, which is an implied operand. 
The zero flag is set if the accumulator is equal to the operand. The carry 
flag is set if the accumulator is smaller than the operand. 

Flags affected: C, H, O, S, Z 
Flag set: N 


CP r 

<CMP 

r> 

CP nn 

<CPI 

nn> 

CPD 

< no 8080> 


CPDR 

< no 8080> 


CPI 

< no 8080> 


CPIR 

< no 8080> 



Compare the memory byte pointed to by HL to the accumulator. Decre- 
ment HL (if D) or increment HL (if I). Decrement the byte count in the BC 
register. Repeat the operation for CPDR and CPIR until a match is found 
or until the BC register pair has been decremented to zero. The zero flag is 
set if a match is found. The parity flag is set if BC is decremented to 0. 

Flags affected: H, S 

Flag set: N, Z if A = (HL), P if BC = 0 


CPL <CAAA> 


DAA <DAA> 


DEC (HL) <DCR M> 


DEC (IX + dd) < no 8080> 

DEC (IY+dd) <no 8080> 

Decrement the memory byte pointed to by the sum of the index register 
and the displacement. 

Flags affected: H, O, S, Z 

Flag set: N 

Flag not affected: C 
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DEC 

r 

<DCR 

r> 

DEC 

BC 

<DCX 

B> 

DEC 

DE 

<DCX 

D> 

DEC 

HL 

<DCX 

H> 

DEC 

SP 

<DCX 

SP> 

DEC 

IX 

< no 8080> 

DEC 

IY 

< no 8080> 


Decrement the index register. 
Flags affected: none 


Dl <DI> 

DJNZ dd < no 8080> 

Decrement register B and jump relative to displacement dd if B register is 
not 0. 

Flags affected: none 


El 

<EI> 


EX 

(SP),HL 

<XTHL> 

EX 

(SP),IX 

< no 8080> 

EX 

(SP),IY 

< no 8080> 


Exchange the 16 bits referenced by the stack pointer with the specified index 
register. 

Flags affected: none 
EX AF,AF' < no 8080> 

Exchange the accumulator and flag register with the alternate set. 

Flags affected: all 
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EX DE,HL <XCHG> 


EXX < no 8080> 

Exchange BC, DE, and HL with the alternate set. 
Flags affected: none 


HALT 


<HLT> 

IM 

0 

< no 8080> 

1M 

1 

< no 8080> 

IM 

2 

<no 8080> 


Sets interrupt mode 0,1, or 2. Interrupt mode 0 is automatically selected 
when a Z80 reset occurs. The result is the same as the 8080 interrupt 
response. Interrupt mode 1 performs an RST 38H instruction. Interrupt 
mode 2 provides for many interrupt locations. 


IN r, (C) <no 8080> 

Input a byte from the port address in register C to register r. 
Flags affected: P, S, Z 


Flags reset: H, N 

IN A,(nn) 

<IN nn> 

INC (HL) 

<INR M> 

INC (IX+dd) 

< no 8080> 

INC (lY+dd) 

< no 8080> 


Increment the memory byte pointed to by the sum of the index register 
and the displacement. 

Flags affected: H, O, S, Z 

Flag set: N 

Flag not affected: C 
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INC r < INR r> 


INC BC < INX B> 

INC DE <INX D> 

INC HL <INX H> 

INC SP <INX SP> 


INC IX <no8080> 

INC IY <no8080> 

Increment the specified index register. 

Flags affected: none 


IND < no 8080> 

INDR < no 8080> 

INI < no 8080> 

INIR < no 8080> 

Input a byte from the port address in register C to the memory byte 
pointed to by HL. Decrement register B. The HL register is incremented 
(if I) or decremented (if D). For INDR and INIR the process is repeated 
until the 8-bit register B becomes 0. 

Flag affected: Z (if B = 0) 

Flag set: N 


JP (HL) < PCHL> 


JP (IX) < no 8080> 

jp (|Y) < no 8080> 

Copy the contents of the specified index register into the program 
counter; then retrieve the next instruction from the address referenced by 
IX or IY. 

Flags affected: none 


JP nnnn 


<JMP nnnn> 
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JP 

C,nnnn 

<JC 

nnnn> 

JP 

M,nnnn 

<JM 

nnnn> 

JP 

NC,nnnn 

<JNC 

nnnn> 

JP 

NZ,nnnn 

<JNZ 

nnnn> 

JP 

P,nnnn 

<JP 

nnnn> 

JP 

PE,nnnn 

< JPE 

nnnn> 

JP 

PO,nnnn 

<JPO 

nnnn> 

JP 

Z,nnnn 

<JZ 

nnnn> 


JR nn < no 8080 > 

Unconditional relative jump with a signed displacement nn. The jump is 
limited to 129 bytes forward and 126 bytes backward in memory. 

Flags affected: none 


JR 

C,nn 

< no 8080> 

JR 

NC,nn 

< no 8080> 

JR 

NZ,nn 

< no 8080> 

JR 

Z,nn 

< no 8080> 

Conditional relative jump to address nn where: 

C 

Means carry flag set (Carry) 

NC 

Means carry flag reset (Not carry) 

NZ 

Means zero flag reset (Not zero) 

Z 

Means zero flag set (Zero) 

LD 

(BC),A 

<STAX B> 

LD 

(DE),A 

<STAX D> 

LD 

(HL),r 

<MOV M,r> 

LD 

(HL),nn 

<MVI M,nn> 

LD 

(IX+dd),r 

< no 8080> 

LD 

(IX+dd),nn 

< no 8080> 

LD 

(IY+dd),r 

< no 8080> 

LD 

(IY+dd),nn 

< no 8080> 
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Move the byte in register r or the immediate byte nn into the memory byte 
referenced by the sum of the index register plus the displacement. These 
instructions can be used to load relocatable binary code. 

LD (nnnn),A <STA nnnn> 

LD (nnnn),BC <no8080> 

LD (nnnn),DE <no8080> 

Store the low-order byte (C or E) of the specified double register at the 
memory location nnnn. Store the high-order byte (B or D) at nnnn + 1. 

LD (nnnn),HL <SHLD nnnn> 


LD (nnnn),IX <no8080> 

LD (nnnn),IY <no8080> 

LD (nnnn),SP <no8080> 

Store the low-order byte of the specified register IX, IY, or SP at the loca¬ 
tion nnnn. Store the high-order byte at nnnn + 1. The instruction LD 
(nnnn),SP can be used to temporarily save an incoming stack pointer. It 
can later be restored by an LD SP.(nnnn) operation. 


LD A,(BC) <LDAX B> 

LD A,(DE) <LDAX D> 


LD A, I < no 8080> 

Load the accumulator from the interrupt-vector register. The parity flag 
reflects the state of the interrupt-enable flip-flop. 

Flags affected: P, S, Z 
Flags reset: H, N 


LD A,R <no8080> 

Load the accumulator from the memory-refresh register. The parity flag 
reflects the state of the interrupt-enable flip-flop. This is an easy way to 
obtain a fairly decent random number. 

Flags affected: P, S, Z 
Flags reset: H, N 
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LD I,A < no 8080> 

Copy the accumulator into the interrupt-vector register. 
Flags affected: none 


LD R,A < no 8080> 

Copy the accumulator into the memory-refresh register. 
Flags affected: none 


LD r,(HL) <MOV r,M> 


LD r,(IX+dd) <no8080> 

LD r,(IY + dd) <no8080> 

Move the byte at the memory location referenced by the sum of the index 
register and the displacement into register r. 


LD 

r,r2 

<MOV r,r2> 

LD 

r,nn 

<MVI r,nn> 

LD 

A,(nnnn) 

<LDA nnnn> 

LD 

BC,(nnnn) 

< no 8080> 

LD 

DE,(nnnn) 

< no 8080> 


Load the low-order byte (C or E) from the location referenced by the 
16-bit pointer nnnn. Load the high-order byte (B or D) from nnnn + 1. 


LD 

HL,(nnnn) 

<LHLD nnnn> 

LD 

BC,nnnn 

<LXI 

B,nnnn> 

LD 

DE,nnnn 

<LXI 

D,nnnn> 

LD 

HL,nnnn 

<LXI 

H,nnnn> 

LD 

S^nnnn 

<LXI 

SP,nnnn> 

LD 

IX, nnnn 

< no 8080> 

LD 

IY,nnnn 

< no 8080> 




















378 MASTERING CP/M 


Load the specified double register with the 16-bit constant nnnn. Be 
careful not to confuse LD HL,(nnnn) with LD HL.nnnn. 


LD 

!X,(nnnn) 

< no 8080> 

LD 

IY,(nnnn) 

< no 8080> 

LD 

SP,(nnnn) 

< no 8080> 


Load the low byte of IX, IY, or SP from the memory location nnnn. Load 
the high byte from nnnn + 1. The LD SP,(nnnn) instruction can be used 
to retrieve a previously saved stack pointer. 


LD 

SP,HL 

<SPHL> 

LD 

SP,IX 

< no 8080> 

LD 

SP,IY 

< no 8080> 


Load the stack pointer from the specified 16-bit register. The SPHL in¬ 
struction can be used to retrieve a previously saved stack pointer when the 
8080 CPU is used. 

LHLD nnnn 
SPHL 


LDD < no 8080> 

LDDR < no 8080> 

LDI < no 8080> 

LDIR <no8080> 

Move the byte referenced by the HL pair into the location pointed to by 
the DE register pair. Decrement the 16-bit byte counter in BC. Increment 
(if I) or decrement (if D) both HL and DE. Repeat the operation for 
LDDR and LDIR until the BC register has been decremented to zero. 


NEG < no 8080> 

This instruction performs a two’s complement on the accumulator. It ef¬ 
fectively subtracts the accumulator from zero. To perform this task on an 
8080 use a CMA command followed by an INR A command. 

Flags affected: all 


NOP 


<NOP> 
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OR (HL) <ORA M> 


OR (IX+dd) < no 8080> 

OR (IY+dd) <no 8080> 

Perform a logical OR with the accumulator and the byte referenced by the 
specified index register plus the displacement. The result is placed in the 
accumulator. 

Flags affected: P, S, Z 
Flags reset: C, H, N 


OR r <ORA r> 


OR nn <ORI nn> 


OTDR < no 8080> 

OTIR < no 8080> 

Output a byte from the memory location pointed to by the HL pair. The 
port address is contained in register C. Register B is decremented. The HL 
register pair is incremented (if I) or decremented (if D). The process is 
repeated until register B has become zero. 

Flags set: N, Z 


OUT (C),r < no 8080> 

Output the byte in register r to the port address contained in register C. 
Flags affected: none 


OUT (nn),A <OUT nn> 


OUTD < no 8080> 

OUTI < no 8080> 

Output a byte from the memory location pointed to by the HL pair. The 
port address is contained in register C. Register B is decremented. The HL 
register pair is incremented (if I) or decremented (if D). 
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Flag affected: 

z 


Flag set: 

N 


POP 

AF 

<POP 

PSW> 

POP 

BC 

<POP 

B> 

POP 

DE 

<POP 

D> 

POP 

HL 

<POP 

H> 

POP 

IX 

< no 8080> 

POP 

IY 

< no 8080> 


Copy the top of the stack into the specified index register. Increment the 
stack pointer twice. 


Flags affected: 

none 


PUSH 

AF 

<PUSH 

PSW> 

PUSH 

BC 

<PUSH 

B> 

PUSH 

DE 

<PUSH 

D> 

PUSH 

HL 

<PUSH 

H> 

PUSH 

IX 

< no 8080> 

PUSH 

IY 

< no 8080> 


The indicated index register is copied to the top of the stack. The stack 
pointer is decremented twice. 

Flags affected: none 


RES b,(HL) < no 8080> 

RES b,(IX + dd) <no8080> 

RES b,(IY + dd) <no8080> 

Reset bit b of the memory byte referenced by the second operand. Bit b 
can range from 0 through 7. 

Flags affected: none 
Flag reset: N 
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RES b,r < no 8080> 

Reset bit b of register r to a value of 0. Bit b can range from 0 through 7. 


Flags affected: 

none 

Flag reset: 

N 

RET 

<RET> 

RET 

c 

<RC> 

RET 

M 

<RM> 

RET 

NC 

<RNC> 

RET 

NZ 

<RNZ> 

RET 

P 

<RP> 

RET 

PE 

<RPE> 

RET 

PO 

<RPO> 

RET 

Z 

<RZ> 

RETI 

< no 8080> 


Return from maskable interrupt. 


RETN < no 8080> 
Return from nonmaskable interrupt. 


The following RL and RLA instructions rotate bits to the left through 
carry. 



Carry 


Register 
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RL (HI) < no 8080> 

The memory byte referenced by the HL pair is rotated left through carry. 
The carry flag moves into bit 0. Bit 7 moves to the carry flag. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


RL (IX+dd) <no 8080> 

RL (lY+dd) <no 8080> 

The memory byte referenced by the sum of the index register and the 
displacement is rotated left through carry. The carry flag moves into bit 0. 
Bit 7 moves to the carry flag. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


RL r < no 8080> 

The byte in register r is rotated left through carry. The carry flag moves into 
bit 0. Bit 7 moves to the carry flag. Note: the instruction RL A performs 
the same task that instruction RLA does, but instruction RLA is twice as 
fast. 

Flags affected: C, P, S, Z 
Rags reset: H, N 


RLA <RAL> 


The following RLC and RLCA instructions rotate bits to the left. 









^I i i i i j_ 

7 ^ 6 ^ 5 ^ 4 ^ 3 ^ 2 ^ 1 0 


c 


' '' i i i i 



Carry 


Register 
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RLC (HL) < no 8080> 

The byte referenced by the HL pair is rotated left circularly. Bit 7 moves to 
both the zero bit and the carry flag. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


RLC (IX+dd) < no 8080> 

RLC (IY + dd) < no 8080> 

The byte referenced by the specified index register plus the displacement is 
rotated left circularly. Bit 7 moves to both the zero bit and the carry flag. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


RLC r < no 8080> 

The byte in register r is rotated left circularly. Bit 7 moves to both the zero 
bit and the carry flag. Note: RLC A performs the same task that instruc¬ 
tion RLCA does, but instruction RLCA is twice as fast. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


RLCA <RLC> 









4 bits 

4 bits 


4 bits 

4 bits 

Accumulator 

Memory 



RLD < no 8080> 

A four-bit rotation over 12 bits. The low four bits of A move to the low 
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four bits of the memory location referenced by the HL pair. The original 
low four bits of memory move to the high four bits. The original high four 
bits move to the low four bits of A. This instruction is used for BCD 
operations. 

Flags affected: P, S, Z 
Flags reset: H, N 


The following RR and RRA instructions rotate bits to the right through 
carry. 


1 1 1 1 1 1 1 ' 



» 7-*»6 -►5 -► 4 -►3 “► 2 -► 1 -*-0 

I I I l 1 1 1 - 

- 

c - 


Register Carry 


RR (HL) < no 8080> 

The memory byte pointed to by the HL pair is rotated right through carry. 
Carry moves to bit 7. Bit 0 moves to the carry flag. 

Flags affected: C, P, S, Z 
Flags reset: H, N 

RR (IX+dd) < no 8080> 

RR (IY+dd) <no 8080> 

The memory byte pointed to by the specified index register plus the offset 
is rotated right through carry. The carry flag moves to bit 7. Bit 0 moves to 
the carry flag. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


RR r <no 8080> 

The byte in register r is rotated right through carry. Carry moves to bit 7. 
Bit 0 moves to the carry flag. Note: RR A performs the same task that 
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instruction RRA does, but instruction RRA is twice as fast. 

Flags affected: C, P, S, Z 
Flags reset: H, N 

RRA <RAR> 


The following RRC and RRCA instructions rotate bits to the right. 



Register 


Carry 


RRC (HL) < no 8080> 

The memory byte pointed to by the HL pair is rotated right circularly. Bit 
0 moves to both the carry flag and bit 7. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


RRC (IX+dd) < no 8080> 

RRC (IY+dd) <no 8080> 

The memory byte pointed to by the index register plus the offset is rotated 
right circularly. Bit 0 moves to both the carry flag and bit 7. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


RRC r < no 8080> 

The byte in register r is rotated right circularly. Bit 0 moves to both the 
carry flag and bit 7. Note: RRC A performs the same task that instruc¬ 
tion RRCA does, but instruction RRCA is twice as fast. 
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Flags affected: C, P, S, Z 
Flags reset: H, N 


RRCA <RRC> 


4 bits 


4 bits 


Memory 


4 bits 


4 bits 


Accumulator 


RRD < no 8080> 

A four-bit rotation over 12 bits. The low four bits of A move to the high 
four bits of the memory location referenced by the HL pair. The original 
high four bits of memory move to the low four bits. The original low four 
bits move to the low four bits of A. This instruction is used for BCD 
operations. 

Flags affected: P, S, Z 
Flags reset: H, N 


RST 

00H 

<RST 

0> 

RST 

08H 

<RST 

1> 

RST 

10H 

<RST 

2> 

RST 

18H 

<RST 

3> 

RST 

20H 

<RST 

4> 

RST 

28H 

<RST 

5> 

RST 

30H 

<RST 

6> 

RST 

38H 

<RST 

7> 

SBC 

A,(HL) 

<SBB 

AA> 


SBC A,(IX+dd) < no 8080> 

SBC A,(IY + dd) <no 8080> 
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Subtract the carry flag and the memory byte pointed to by the sum of the 
index register and the displacement from the accumulator. The result is 
placed in the accumulator. 

Flags affected: C, H, O, S, Z 
Flag set: N 


SBC 

A,r 

<SBB r> 

SBC 

A,nn 

<SBI nn> 

SBC 

HL,BC 

< no 8080> 

SBC 

HL,DE 

< no 8080> 

SBC 

HL,HL 

< no 8080> 

SBC 

HL,SP 

< no 8080> 


Subtract the specified CPU double register and the carry flag from the HL 
register pair. The result is placed in HL. You may need to reset the carry 
flag with an OR A operation before using these instructions. 

Flags affected: C, H, O, S, Z 


Flag set: N 


SCF 

<STC> 


SET 

b,(HL) 

< no 8080> 

SET 

b,(IX+dd) 

< no 8080> 

SET 

b,(IY+dd) 

< no 8080> 


Set bit b of the memory byte referenced by the second operand. Bit b can 
range from 0 through 7. 

Flags affected: none 
Flag reset: N 


SET b,r < no 8080> 

Set bit b of register r. Bit b can range from 0 through 7. 

Flags affected: none 
Flag reset: N 
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The following SLA instructions shift bits to the left. 





c 


7 t 6 t 5 VT 3 t 2 i i r 


Carry 


Register 


SLA (HL) < no 8080> 

Perform an arithmetic shift left on the memory byte pointed to by the HL 
pair. Bit 7 is moved to the carry flag. A zero is moved into bit 0. This 
operation doubles the original value. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


SLA (IX+dd) < no 8080> 

SLA (lY+dd) < no 8080> 

Perform an arithmetic shift left on the memory byte pointed to by the index 
register plus the displacement. Bit 7 is moved to the carry flag. A zero is 
moved into bit 0. This operation doubles the original value. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


SLA r < no 8080> 

Perform an arithmetic shift left on register r. Bit 7 is moved to the carry 
flag. A zero is moved into bit 0. This operation doubles the original value. 
Note: SLA A performs the same task that instruction ADD A, A does, but 
instruction ADD A,A is twice as fast. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


The following SRA instructions shift bits to the right. 
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~T 1 1 | | | 
—1 1 1 1 L 1 

1— 

0 

1 


c 

1 Register 


Carry 


SRA (HL) < no 8080> 

Perform an arithmetic shift right on the memory byte pointed to by the 
HL pair. Bit 0 moves to the carry flag. Bit 7 is copied into bit 6. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


SRA (IX+dd) <no8080> 

SRA (lY+dd) <no8080> 

Perform an arithmetic shift right on the byte pointed to by the index 

register plus the displacement. Bit 0 moves to carry and bit 7 is copied into 
bit 6. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


SRA r < no 8080> 

Perform an arithmetic shift right on register r. Bit 0 moves to carry and bit 
7is copied into bit 6. The operation effectively halves the register value 
The carry flag represents the remainder. The carry flag is set if the original 
number was odd. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


The following SRL instructions shift bits to the right. 


0 





Register 


Carry 
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SRL (HL) < no 8080> 

Perform a logical shift right on the byte pointed to by the HL register pair. 
A zero bit is moved into bit 7. Bit 0 moves to the carry flag. 

Flags affected: C, P, Z 
Flags reset: H, N, S 


SRL (IX + dd) < no 8080> 

SRL (IY + dd) < no 8080> 

Perform a logical shift right on the byte pointed to by the index register 
plus the displacement. A zero bit is moved into bit 7. Bit 0 moves to the 
carry flag. 

Flags affected: C, P, Z 
Flags reset: H, N, S 


SRL r < no 8080> 

Perform a logical shift right on register r. A zero bit is moved into bit 7. Bit 
0 moves to the carry flag. 

Flags affected: C, P, S, Z 
Flags reset: H, N 


SUB (HL) <SUB M> 


SUB (IX+dd) < no 8080> 

SUB (IY+dd) <no 8080> 

Subtract the memory byte referenced by the index register plus the 
displacement from the value in the accumulator. The result is placed in A. 

Flags affected: C, H, O, S, Z 
Flag set: N 

SUB r <SUB r> 


SUB nn 


<SUI nn> 
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XOR (HL) <XRA M> 


XOR (IX+dd) <no8080> 

XOR (IY+dd) <no 8080> 

Perform a logical exclusive OR with the accumulator and the byte 
referenced by the sum of specified index register and the displacement. 
The result is placed in the accumulator. 


Flags affected: P, S, Z 

Flags reset: 

C, H, N 

XOR r 

<XRA r> 

XOR nn 

<XRI nn> 












APPENDIX I 

The CP/M 
BDOS Functions 


The Nondisk BDOS Functions 


Function 

number 

(inC) 

Operation 

Value sent 

Value returned 

1 

Read console 


character in A 

2 

Write console 

character in E 

character in A 

3 

Read reader 


4 

Write punch 

character in E 


5 

Write list 

character in E 

0 = not ready or 
character in A 

6 

Direct console 1/O 

FF (input) 
character (output) 

7 

Determine IOBYTE 


byte in A 

8 

Set IOBYTE 

inE 


9 

Print buffer 

address in DE 


10 

Read buffer 

address in DE 

byte in A 

11 

Return console status 


12 

Return CP/M version 


byte in A and L 
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The Disk-Related BDOS Functions 

Function 

number 

Operation Value sent Value returned 


13 

Reset disks 

14 

Select disk 

15 

Open file 

16 

Close file 

17 

Search for first 

18 

Search for next 

19 

Delete file 

20 

Read sequential 

21 

Write sequential 

22 

Make new file 

23 

Rename file 

24 

Determine logged-in drives 

25 

Find default drive 

26 

Set DMA address 

27 

Get allocation vector 

28 

Write protect disk 

29 

Find R/O drives 

30 

Set file attributes 

31 

Get disk parameter block 

32 

Get or set user number 

33 

Read randomly 

34 

Write randomly 

35 

Get file size 

36 

Set random record 


E = disk 

DE = FCB 

A = error code 

DE = FCB 

A = error code 

DE = FCB 

A = error code 
A = error code 

DE = FCB 

A = error code 

DE = FCB 

A = error code 

DE = FCB 

A = error code 

DE = FCB 

A = error code 

DE = original FCB 

A = error code 
HL = vector 

A = drive 

DE = address 


HL = vector 

HL = vector 

DE - FCB 


HL = block 

E = FF 

A = user number 

E = new user number 

DE = FCB 

A = error code 

DE = FCB 

A = error code 

DE = FCB 

DE = FCB 

















INDEX 


Aborting a program, 192 
ADDRESS program, 199-203 
Alphanumeric characters, 9, 35 
Altering BIOS, 17, 20 
Ambiguous symbols, 6, 113, 121 
AND, logical, 46, 50, 120, 124 
Angle brackets, enclosing parameters, 104 
Argument. See Parameter 
ASCII bias, 151 
ASCII character set, 316-319 
ASCII coding, 116, 149, 174 
changing lowercase to upper, 118 
converting to binary, 54 
ASM assembler, 34 
Assembler directives, 35 
Assemblers 

Digital Research, 23-25, 34, 80-81, 84 
Microsoft, 25-26, 34, 74, 81, 84 
Assembling with ASM, 23, 37 
Assembling with a debugger, 42 
Assembling with MAC, 24, 37 
Assembling with MACRO-80, 25, 37 
Assembly language, 34 
Assembly listing, 37 
Base conversion 
binary to ASCII binary, 54, 275 
binary to BCD, 123 
binary to decimal, 276 
binary to hexadecimal, 149, 279 
hexadecimal to binary, 159 
BCD coding, 123 
BDOS, 2, 5, 130 
BDOS calls, 130 
to change default drive, 282 
to change IOBYTE, 161 
to close a disk file, 226 
to create a disk file, 211 
to delete a disk file, 216, 252 
to determine console status, 133, 192 


BDOS calls 0 continued) 

to determine CP/M version, 153 
to determine default drive, 293 
to determine IOBYTE value, 153 
to find next file, 260 
to locate the disk parameter block, 270 
to open a disk file, 177 
to perform console input, 132, 154 
to perform console output, 135 
to perform printer output, 167 
to read console buffer, 154 
to print a string, 135 
to read a sector, 182 
to rename a disk file, 225, 251 
to set the DMA address, 182 
to set file attributes, 215, 248 
to write a disk sector, 225 
BDOS function numbers, 130 
for disk operations, 393 
for nondisk operations, 131, 392 
Binary numbers, 174 
converting to ASCII, 151 
BIOS, 2, 5, 130 
altering, 20 
assembling, 23 
cold start, 22, 40, 60 
copying to disk, 26 
locating, 21 

logical devices, 4, 40, 45 
mapping printer output in, 58 
source program for, 64 
USER area in, 21,40 
vectors for, 21, 39, 130, 310 
warm start, 22, 28, 40, 44, 60, 86, 130, 
291 

Bit setting and resetting, 46, 79 
Bit bucket, 56 

Block allocation map, 291-292 
program to display, 294-310 





























































Block move, 92 
Block numbers, 174-175, 289 
Block size, 174, 271 
Boot 

cold, 22 

warm. See Warm start 
Branch, absolute vs. relative 78 
Breakpoint, 97 
Buffer 


console. See Console buffer 
general, 4 
sector, 182 


Built-in commands, 6-8 
Cache, memory, 59 
Carry flag, 125, 159 

£P P -’ 2 ’ 5 'also Built-in commands 
Closing a disk file, 226-228 
Cold boot, 22 
Colon 


in device name, 40 
in label, 35 
Command file, 9 
displaying, 194 
Command line tail, 4 , 178 
Commands, 6 , 9 
Comments, 35, 76 
Comparing disk files, 245, 247 
Comparison, ASCII, 116 
Comparison, binary, 113, 115 
Complement, two’s, 76 
Conditional assembly, 74-75 
Console buffer, 139, 143, 156-157 159 

164 no » 


getting characters from, 156-157 159 
printing characters from, 139 , 143 
reading characters into, 154, 156 
Console command processor 2 5 
Console, 144 


BIOS vectors for, 22, 41-42 
BDOS calls for, 132 
logical vs. physical, 55 
status, BDOS call for, 134 
Constants, in macro library 80 
CONTIN program, 12 
Control characters, 8 , 157 
check for paired, 198 
Conversion, base. See Base conversion 
COPY program, 20 
Copying BIOS to disk, 26-31 
Copying a diskette 
with COPY, 20 


with PIP and SYSGEN, 17-19 
Copying a file 
with PIP, 17 
with COPYV, 248-249 
Copying all files, 17 


Copying system tracks, 17-20 
CP/M 


altering, 17, 20-21 
finding the version number, 153 
organization of, 2-5 
SYSGEN version of, 18, 28 
working version of, 18, 28 
CPU, distinguishing 8080 from 
Z80,146-147 

CRYPT program, 233-235 
DAA operation, 152-153 
Data port, 50 
Data terminal ready, 51 
encorporating a check for, 55 
program to find the flag for 52 
Data tracks, 17 
DDT, 24. See also Debugger 
Debugger 


loading a file with an offset, 30 
loading a hex file with, 24 
return to, 97, 214 
setting up an FCB with, 30 
Default FCB, 4 , 164 
DELETE program, 257-260 
Device names, 40 
DIR command, 6 

DIREC program, 283-287, 294-310 
Directive, assembler, 35 
Directory, disk, 8 , 17, 174, 212 
blocks, 289-290 


Directory allocation, 272 
Disassembly, 21,40 
Disk 


block numbers, 174-175, 289 
block size, 174, 271 
copying, 17-20 
data tracks on, 17 
formatting, 16 

organization, 173-174, 212, 268-274 
program storage area on, 17 
resetting. See Warm start 
system tracks on, 17 
Disk directory, 8 , 17, 174, 212 
blocks, 289-290 
Disk FCB, 174 
Disk file 
closing, 226-228 
creating, 211-212 


duplicating, 229 


opening, 177-182, 221-222, 224 
protecting, 116, 213, 248 
reading, 238, 240 


reading a sector of, 182-183 
renaming, 9, 225, 251-252 
unprotecting, 212-215 
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Disk file (continued) 
writing, 240, 242 
writing a sector of, 225 226 
Disk-operating system, 2 
Disk parameters, 268-270 
directory allocation, 272 
for 8-inch floppy, 273, 288 

extent mask, 272 
program to display, 281-282, 288 
Disk parameter block, 270-274 
Display 

of ASCII file, 188 
of binary file, 194 
Division, macro for, 278 
DMA address, 182, 240 
DTR bit, 57 

Dummy parameter, 73 

DUMP program, 194-197 
Editor, 34 

Encrypting a file, 230, 232, 235 237 
End of file, 59,61 
Engaging the printer 
with control-P, 11 
with the debugger, 42-43 
with an executing program, 43-45 
with the IOBYTE, 45-47 
Envelope addressing, 198 
Erase file, 7, 17, 252-253, 260 
Error messages, macro for, 176 
Escape key, termination with, 192-1*3 
Executable file, 38-39 
Extension, file name, 10 
Extent, 11, 175 
Extent mask, 272 
FCB. See File control block 

File control block, 4, 173-175, 212 
block numbers, 174-175 
block size, 174, 271 
default, 4, 164 
disk, 174 
example, 175 
extent, 11, 175 
file name, 174 
file type, 174 
from command line, 164 
initializing, 30, 178-180, 214, 219 
memory, 174, 177 
multiple, 11, 175, 290 
updating disk, 227 
File name, 9 

ambiguous, 113, 121, 220 
extension, 10 _ 

macro to delete, 216, 218-219 
macro to input, 184 
File protection, 116, 215 
File type, 10 


Filling memory with a constant, 109-112, 

293 

Flags 

assembly time, 99 
carry, 125, 159 
data ready, 50 

data terminal ready, 51 

distinguishing 8080 from Z80 with, 146 

file protection, 116 

macro, 99 

overflow, 146 

parity, 146 

ready, 50 

resetting and setting, 79 
status, 50 

write protection, 212 
zero, 46 

zero for double register, 94 
Z80, 78 

Floppy disk. See disk 

Formatting a disk, 16 

Function number, BDOS, 130 131, 
392-393 

Global variable, 98 
GO program, 165-166 
HEX file, 37-38 

converting to COM file, 38 
loading with debugger, 24 
Hexadecimal numbers 

converting to binary, 159 

converting from binary, 149, 151-153, 
High-level language, 34 
Inline macro, 82, 94, 207 

Instruction set 

8080, alphabetic listing of, 324 32/ 
8080, details of, 3 ?°" 3 66 
8080, numeric listing of, 328 331 
Z80, alphabetic listing of, 332-34U 
Z80, details of, 367-391 
Z80, numeric listing of, 341-34* 
Interrupts, 4, 50 
IOBYTE, 4, 130 

changing with BASIC, 47-48 
changing with a debugger 47 
changing with an executable program, 
161 

changing with ST AT, 48 
engaging the printer with, 45-47 

program to display, 153-154 

directing printer output with, 56-58 
Jump, absolute vs. relative, 78 
Jump vectors, 21, 39, 130, 310 

Label, assembly-language, 35 
Leading-zero suppression, 276 
Library, macro, 80. See also Macros, 
library of 

Linking loader, 25, 38 







List device. See Printer 
Literal parameter, 104 
Loader, 25, 38 


Local variable, 84, 94 , 99 
Logical AND, 46, 50, 120, 124 
Logical device, 4, 40, 153 
mapping to actual device, 45-48 
Logical OR, 94 
Logical shift, 54 
Looping method, 50 

Lowercase, conversion to upper, 118-121 
MAC assembler, 23-25, 34, 80-81, 84 
Macro, 71 


definition of, 72 
directory of, 81 
dummy variable in, 73 
expansion of, 72 
global variable in, 98 
inline, 82, 94 , 207 

library, 80. See also Macros, library of 
local variables in, 84, 94 , 99 
missing parameters in, 74 , 104 
for Z80 instructions, 75 
DJNZ, 79 
NEG, 76 
Macro assembler, 72 
MACRO-80 assembler, 25, 34 , 74 
Macro parameters, 73, 84 ’ 
angle brackets around, 104, 176 
omitted, 74, 104 
Macros, library of 
ABORT, 193 
AMBIG, 122 
BINBIN, 275 
CLOSE, 228-229 
COMPAR, 114-115 
COMPRA, 116-118 
CPMVER, 154 
CRLF, 137 
DELETE, 217-218 
DIVIDE, 280-281 
ENTER, 89 
ERRORM, 177 
EXIT, 89 
FILL, 110 
FILLD, 294 
GFNAME, 185-197 
HEXHL, 159-161 
HLDEC, 276-277 
LCHAR, 168 
LDFILE, 238-239 
MAKE, 213 

MOVE, 93, 100-101, 106-107 
MULT, 279-280 
OPEN, 181 
OUTHEX, 150 


Macros, library of (continued) 
OUTHL, 279 
PCHAR, 135 
PFNAME, 217 
PRINT, 141, 144-145 
PROTEC, 248 
READB, 157-158 
READCH, 134 
READS, 184 
RENAME, 226 
SBC, 125 
SETDMA, 183 
SETUP 2 , 223-224 
SYSF, 133 
UCASE, 119 
UNPROT, 216 
UPPER, 124 
VERSN, 83 
WRFILE, 241-242 
WRITES, 227 
Mapping 

disk block numbers, 291-292 
IOBYTE, 45 


, , f iMiywwu devices, 45 , 48 
Masking AND, 46, 58 
Memory allocation, 3 , 19 
Memory cache, 59 
saving on disk, 260-261 
Memory FCB, 174 
Memory map, 64K, 320-323 
Mnemonic, 22 , 34 

Moving information in memory 92-95 
97-100,104-105,107,109 
Multiplication, macro for 278 
NUL, 74, 104 


Offset, calculation of, 29-30 
One’s complement, 76 

Spe e rtd, a 35 Skfile ’ 177 - 182 ’ 221 - 222 ’ 224 
Operating system, 2 
Operation code, 34 
OR, logical, 94 
Order of evaluation, 105, 107 
ORG directive, 22, 35 , 84 
Overflow flag, 146 
PAGE program, 168-169 
PAIR program, 204-206 
Parameter 
actual, 73 


angle brackets around, 104, 176 
command line, 178-180, 219-220 
dummy, 73, 88 
formal, 73 
literal, 104 


macro, 73 
Parity flag, 146 









Patch, 42 

Peripheral device, 4, 45 
Physical device, 45, 153 
PIP program, 12, 17 
Pointer, memory cache, 60-01 
Port, peripheral, 50 
Printer _ 

engaging with BASIC, 47-48 
engaging with control-P, 11, 55 
engaging with the debugger, 42-43 
engaging with an executable program, 
43-45 

engaging with the IOBYTE, 45-47 
mapping output, 56, 58 
directing output to console, 56 
directing output to memory cache, 
59-60 

Printer ready, 50 
Printing a string, 139-144 
Program storage area, 17 
Reading a sector, 182-183 
Reading a file, 238 
Ready flag, 50 
Record, 11, 175, 289 
Register 
data, 50 

saving CPU, 131 
status, 50 
testing double, 94 
REL file, execution of, 38-39 
RENAME program, 253-256 
Renaming a file, 251-252 
Repeat macro, 203, 207-208 
Resetting a bit, 46 
Restart instructions, 4, 97, 214 
SAVEUSER program, 26 
Saving a program, 7 
Scrolling, 7 
Sector, 16 
Semicolon 
double, 76 
single, 35 

Sending a character, 50 
Setting a bit, 79 
SHOW program, 189-191 
SID, 24. See also Debugger 
Size of file, 11, 320 
Stack pointer, 36 

saving and restoring, 86-88, 9U 


STAT, 11,213 

changing the IOBYTE with, 48 
changing names of devices, 49 
Status flags, 50 
Status port, 50 
Subtraction, 76 
16-bit, 125, 275 
SYM file, 24 
Symbol table, 24 
SYSGEN program, 17-19, 27-31 
System boot, 22 
System diskette, 16 
System parameter area, 2 
System tracks 
copying, 17-19 
revising, 26-31 
Tail, command line, 4, 178 
Terminating programs, 192-193 
TP A, 2, 5, 164 
Tracks, 16 
data, 17 
system, 17 

Transient command, 9 
Transient program area, 2, 5, 164 
Two’s complement, 76, 275 
USER area of BIOS, 21. 
source program for, 64-68 
See also BIOS 
User number, 130, 174 
Variable 
dummy, 73 
global, 98 
local, 84, 94, 99 
Vectors, 21, 39, 130 
Verification, 245, 247 
Version 
CP/M, 153 

coding with macro, 81-82 84 

Warm start, 2, 8, 22, 40, 44, 60, 86, 130, 
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Working version 
of BIOS, 21 
of CP/M, 18 
Wrap around, 60 
Write-protected file, 212 
Writing a disk file, 240, 242 
Writing a sector, 225-226 
Zero, testing double register for, 94 
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